Предмет: Информатика,
автор: nikitaefimov19
Дано целое число.Если оно является положительным, то прибавить к нему 1; в противном случае не изменять его . Вывести полученное число.
boggi725:
И что с этим сделать? Написать программу?
var
i:integer;
begin
writeln('введите число');
readln(i);
if (i>=0) then
i:=i+1
else
i:=i;
writeln (i);
end.
i:integer;
begin
writeln('введите число');
readln(i);
if (i>=0) then
i:=i+1
else
i:=i;
writeln (i);
end.
Ответы
Автор ответа:
0
var i:integer;beginwriteln('введите число');readln(i);if (i>=0) theni:=i+1elsei:=i;writeln (i);end.
Похожие вопросы
Предмет: Английский язык,
автор: didoco
Предмет: Русский язык,
автор: zosyalk
Предмет: Русский язык,
автор: Сигизмунд228
Предмет: Математика,
автор: izabella9
Предмет: Информатика,
автор: Хамза007