Регистрация
Verabogomaz
26.07.2020 07:55
Информатика
Есть ответ 👍

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

205
390
Посмотреть ответы 3

Ответы на вопрос:

Maryna03
Maryna03
4,5(31 оценок)
Число не меньше скольки нужно загадать?
cJKYSIRJH
cJKYSIRJH
4,7(26 оценок)
Var n: integer; s: real; begin writeln('загадай однозначное число')' read(n); s: =n; s: =s*2+n; s: =s/n; writeln(s); end.
GeliaSecret2005
GeliaSecret2005
4,4(53 оценок)
Var  a,b,c,mx: integer;   p: real; begin  readln (a,b,c);   mx: =a;   if mx< b then mx: =b;   if mx< c then mx: =c;   p: =(a*b*c)/mx;   write(p); end.   

Популярно: Информатика