1. Главная
  2. Библиотека
  3. Информатика
  4. Дано целое число. Если оно является положительным, то прибавить к нему 1, в противном случае не изменять. Текст программы:...

Дано целое число. Если оно является положительным, то прибавить к нему 1, в противном случае не изменять. Текст программы: program CHISLO;

«Дано целое число. Если оно является положительным, то прибавить к нему 1, в противном случае не изменять. Текст программы: program CHISLO;»
  • Информатика

Условие:

Дано целое число. Если оно является положительным, то прибавить к нему 1, в противном случае не изменять.

Вывести полученное число.

Решение:

Текст программы:

program CHISLO;

uses crt;

var

a,b:integer;

begin

clrscr;

write('Vvedite celoe chislo '); readln(a);

if (a=0) t...

Не нашел нужную задачу?

Воспользуйся поиском

Выбери предмет