Регистрация
Darya0192
23.02.2023 06:28
Информатика
Есть ответ 👍

Напишите программу, которая для заданного целого числа определяет:

а) является ли число четным;

б) оканчивается ли оно цифрой 5.

Для решения задачи вспомните операцию mod (остаток от деления) и составьте логические выражения для ответа на во задачи.

263
273
Посмотреть ответы 2

Ответы на вопрос:

Jelly2005
Jelly2005
4,6(42 оценок)

ответ:Ох уж и не думал что вернусь в этот язык

Объяснение:

program название;

var a;

Begin

Writeln ("Введите число:");

Readln(a);

if (a mod 2 <> 1) then Write("Число нечетно");

else write ("Число чётное");

if (a mod 5 <> 5 and a mod 10 <> 5) then write ("Число не оканчивается на 5")

else Write ("Число оканчивается на 5");

end.

фарангиз5
фарангиз5
4,4(58 оценок)
Var a,b: real; i,d: integer; begin a: =0; b: =0; d: =1; for i: =1 to 30 do begin  a: =a+100;   b: =b+d;   d: =d*2;   end; b: =b/100; if a> b then writeln('богач отдал больше') else writeln('бедный отдал больше'); end.

Популярно: Информатика