Паскаль. составить программу для решения задачи (y:=x в квадрате + модуль x) и округлить результат до целого числа. (var, begin)

Ответ

Автор - LikeSmileLJkee

var x: real; y: integer;
begin
write('Введите x: ');
readln(x);
y:=trunc(sqr(x)+abs(x));
write('y равен ',y);
readln;
end.

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.