Предмет: Информатика, автор: bogen

Определить является ли целая часть числа m/n
четной. Если она четная,
то m возвести в квадрат, иначе n утроить.

Ответы

Автор ответа: saypl
0
var m,n:integer;
begin
write('Введите два числа m и n: '); Readln(m,n);
if (m div n)  mod 2 = 0 then m:=m*m
else n:=n*3;
Write('m=',m,',  n=',n);
end.
Похожие вопросы
Предмет: Химия, автор: gulmira1201
7.Прочитайте утверждения. Если вы считаете, что утверждение верно, поставьте знак «+»,
если неверно – знак «—».
Утверждение Верно/
Неверно

В лаборатории во время работы с химическими реактивами при несоблюдении
техники безопасности пролилась кислота. Её можно нейтрализовать кислотой.
Шипучие и газированные напитки утоляют жажду. При смешивании лимонной
кислоты, соды (щелочь) и воды получится шипучий и газированный напиток,
освежающий, как лимонад.
В чайнике постепенно накапливается накипь. Для очистки накипи, имеющей
щелочную среду, в чайнике развели в 1 литре воды 1—2 чайные
ложки лимонной кислоты и прокипятили. Накипь исчезла без следа, легко
отслоившись под действием кислоты.
Молоко имеет кислую среду. При добавлении в него воды происходит реакция
нейтрализации. Кислота и вода нейтрализуют друг друга, выделяя углекислый
газ, который вспенивает смесь.
Предмет: Русский язык, автор: Maria11000
Предмет: Математика, автор: tumkafixeye