1. Составьте программу, увеличивающую введенное число на 1, если
оно больше или равно100 и уменьшающее число на 1 в противном
случае.
2. Составить программу, запрашивающую возраст и отвечающую
«Привет друг» если возраст введен меньше 16 лет и отвечающую «Не
знаю тебя» в противном случае.
3. Составить программу - отзывающуюся только на имя «Петя».
ПОЖАЛУЙСТА, помогите
Answers & Comments
===== PascalABC.NET =====
begin
var n := ReadInteger('Введи целое число:');
if n >= 100 then
n += 1
else
n -= 1;
Write(n)
end.
=========================
begin
if ReadInteger('Сколько тебе лет?') < 16 then
Write('Привет, друг')
else
Write('Не знаю тебя')
end.
=========================
begin
if ReadlnString('Как тебя зовут?') = 'Петя' then
Writeln('Привет,как дела?')
end.