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