Составить программу,определяющую результат гадания на ромашке "любит -не любит",взяв за исходное данное количество лепестков n.
5-9 класс
|
Если четное, то не любит :(, если нечетное - то любит :).
var
n : integer;
begin
read (n);
if n mod 2 = 0 then writeln (':(') else writeln (':)');
end.
Другие вопросы из категории
shift7 shift8 shift9 shift0
2*2*2*2=16;
3*3*3*3=81
Агент 007 узнал, что в секретном сейфе трёхзначный код, в котором все три цифры разные.При этом средняя цифра равна разности крайних цифр. Составить программу, которая напечатает для него все такие числа.
Читайте также
Составить программу, определяющую, является ли данное утверждение истинным:Ровно одно из чисел А и В не превышает 100
Или
составьте программу, которая определяет на сколько в строке S слов, начинающихся на главную букву больше, чем в строке T
надо решить одну из них
Составить программу,которая выводит на экран сумму нечетных чисел от 1 до 30 в Pascal ABC.
например армия(строка а)
арбуз (строка б)
2)составьте программу ,которая предлагает ввести с клавиатуры две строки а и б ,соеденяет их и выводит результат в одну строку
например: тепло(строка а)
ход(строка б)
2.Составьте программу вычисления количества трёхзначных чисел палиндромов ( чисел, которые читаются одинаково слева направо и справа налево).
3.Найти двухзначные числа, которые делятся на сумму своих цифр
4.Составьте программу вывода количества трёхзначных чисел, у которых цифры упорядочены строго по убыванию.
РЕБЯТА СРОЧНО!!!!!!!!!!!