Регистрация
T3211
13.06.2021 09:49
Информатика
Есть ответ 👍

Pascal abc напишите программу, которая считывает целое число и выводит текст, аналогичный в примере. пробелы, знаки препинания, заглавные и строчные буквы важны! ввод : 179 вывод: the next number for the number 179 is 180.the previous number for the number 179 is 178.

292
385
Посмотреть ответы 2

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

Юля9887
Юля9887
4,7(25 оценок)
Var n: integer; begin readln(n); writeln('the next number for the number ',n,' is ',n+1,'.'); writeln('the previous number for the number ',n,' is ',n-1,'.'); end.
Khlana30
Khlana30
4,4(2 оценок)
Var a,b: integer; c: real; begin readln(a,b); if ((a+b) mod 2 = 0) then c: = a*b else c: = a/b; writeln(c); readln(); end. 

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