Написать программу в паскале .
Если число чётные то делим на два ,если нечётное то возвести в квадрат .
Ответы
Ответ дал:
0
var a: integer;
begin
readln(a);
if a mod 2=0 then writeln (a/2) else writeln (sqr(a));
end.
Ответ дал:
0
Думаю, у Вас ошибка. Так как число нужно возвести в квадрат в случае, если оно нечётное, то нужно написать else weriteln (a*a)
Ответ дал:
0
Также "else..." нужно писать не с новой строчки
Ответ дал:
0
Также нет названия программы. Остальное всё идеально. Если это я что-то не так понял, скажите.
Ответ дал:
0
sqr - это оператор, который возводит число в квадрат (проверьте на Паскале)
Похожие вопросы
2 года назад
2 года назад
2 года назад
8 лет назад