Предмет: Информатика,
автор: Enot351
помогите решить задачу!(програмирование линейных алгаритмов)
Приложения:
Ответы
Автор ответа:
1
var x,y: integer;
begin
readln(x);
y:=x+2,5;
y:=y*x;
y:=y-1;
y:=y*x;
y:=y+1;
writeln(y);
end.
Похожие вопросы
Предмет: Английский язык,
автор: Sofa4ka11
Предмет: Русский язык,
автор: sophiakrutko
Предмет: Окружающий мир,
автор: иван1161
Предмет: Математика,
автор: mehiova198615
begin
readln(x);
y:=x+2,5;
y:=y*x;
y:=y-1;
y:=y*x;
y:=y+1;
writeln(y);
end.