Регистрация
dimaschastny
21.02.2021 04:14
Информатика
Есть ответ 👍

Ть будь ласка з , зараз вивчаємо алгоритми з розгалуженнями. задали таблицю додому(4,5 пункти доробити), іть, клас​

277
470
Посмотреть ответы 1

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

12355689
12355689
4,8(20 оценок)
Var       a: integer;       b: double; begin       readln(a);       b : = a;       if (a mod 10 = a) then             b : = a * 3;       if (a div 100 < > 0) and (a div 1000 = 0) then             b : = a / 3;       writeln(b); end.

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