Предмет: Информатика,
автор: semenovad72
решите пожалуйста в паскале
Приложения:
Ответы
Автор ответа:
0
Ответ:
var x:integer;
begin
read(x);
if x>0 then write(x*x-4) else write(x)
end.
Похожие вопросы
Предмет: Русский язык,
автор: bill100500
Предмет: Английский язык,
автор: cnfccc
Предмет: Русский язык,
автор: ника424
Предмет: Окружающий мир,
автор: rikkir111133