Stanislav177
22.01.2021 15:36

Напишите программы: 1. дано число кратное 7 2. дано число. определить заканчивается ли оно на 0. 3. дано 2 числа найти минимальное.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Dasna12345
08.10.2020 16:15
1) var
a: longint;
begin
readln(a);
if (a mod 7 = 0) then
writeln('YES')
else
writeln('NO');
end.
2) var
a: longint;
begin
readln(a);
if (a mod 10 = 0) then
writeln('YES')
else
writeln('NO');
end.
3) var
a, b: longint;
begin
readln(a, b);
if (a > b) then
writeln('a > b');
if (a < b) then
writeln('a < b');
if (a = b) then 
writeln('a = b');
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота