залипушечка
23.03.2020 11:49

1. даны два числа. если оба кратны 3, то первое уменьшить в два раза. free pascal

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
virtuspro2000
30.09.2020 19:00

Var a,b: real;

begin

readln(a,b);

If (a mod 3=0) and (b mod 3=0) then a:=a/2;

writeln(a);

end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота