Регистрация
AlinaRaytman
30.04.2020 12:25
Информатика
Есть ответ 👍

Дано целое число. если оно является положительным, то прибавить к нему 23; в противном случае не изменять его. вывести полученное число. 1/ program cislo; var a: integer; begin writeln('введи число a'); readln(a); if a > 0 then a: =a; writeln(a); readln; end. 2/program cislo; var a: integer; begin writeln('введи число a'); readln(a); if a < 0 then a: =a+23; writeln(a); readln; end. 3/program cislo; var a: integer; begin writeln('введи число a'); readln(a); if a > 0 then a: =a+23; writeln(a); readln; end.

300
500
Посмотреть ответы 2

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

atexpro444ggvg
atexpro444ggvg
4,6(99 оценок)
Ответ 3. только я не понимаю, зачем под конец программы оператор read. программа корректно работает и без него, по мне, он не нужен
svetlana1980ang
svetlana1980ang
4,4(70 оценок)
1.1100112 2.12223 3.10114 4.1436 5.1238 6.509

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