Дано целое число. Если оно является положительным, то прибавить к нему 1; в противном случае не изменятьего. Вывести полученное число.
10-11 класс
|
var
i : Integer;
begin
Write('Введите целое число: ');
Readln(i);
if i >= 0 then inc(i);
Writeln(i);
end.
Другие вопросы из категории
1) 5. 2) 2. 3) 3. 4) 4.
котором живет ваш друг — восьмиэтажный.Какое количество информации несет сообщение о том, что он живёт наЗ этаже? №3. Информационный объем одной буквы 4 бита. Найти мощность алфавита. №4. Информационное общение объемом 1,5 Кбайт содержит 3072 символа. Сколько символов содержит алфавит, при помощи которого записано это сообщение?
добрый вечер, школьники, студенты, а также более старшие представители (очень хотелось бы прочитать мнение студентов-программистов, специалистов по базам данных).
помогите, пожалуйста, ответить на вопрос по базам данных
вопрос:
Какой проект даст алгоритм декомпозиции в НФБК отношения Apply(SSN,cName,state,date,major) с функциональными зависимостями cName → state и SSN,cName → date,major? *
Читайте также
Написать программу для Pascal.
Дано целое число, если оно является положительным, то прибавь к нему 5; в противном случае не изменять его. Вывести полученное число.
этих фотография снизу
Вывести полученное число
пожалуйста на c++