Выполнить алгоритм. Начало 1.Загадай однозначное число не меньше . 2.Умножить число на 2. 3.Прибавь загаданное число. 4. Разделить на загаданное число. 5.Результат. Конец

Выполнить алгоритм. Начало 1.Загадай однозначное число не меньше . 2.Умножить число на 2. 3.Прибавь загаданное число. 4. Разделить на загаданное число. 5.Результат. Конец
Гость
Ответ(ы) на вопрос:
Гость
var n:integer;s:real; begin writeln('Загадай однозначное число')' read(n); s:=n; s:=s*2+n; s:=s/n; writeln(s); end.
Гость
Число не меньше скольки нужно загадать?
Не нашли ответ?
Ответить на вопрос
Похожие вопросы