Составь и запиши программу на языке Паскаль, которая, - вопрос №12918967 от annshik 12.04.2021 11:57

Question

Информатика: Составь и запиши программу на языке Паскаль, которая, если введенное число отрицательное и кратно 4, меняет его на противоположное. Дано целое двухзначное число. Вывести на экран Первое больше , если цифра десятков больше цифры единиц решается четвертная и годовая оценка писать программами на паскале

annshik · Answer

1) var i:integer;Begin readln(i); If (i 0) and (i mod 4 = 0) then i:= i * -1; write(i);End.2) var i: integer;Begin readln(i); if (i div 10) (i mod 10) then write( Первое больше );End....