Question

Программисты хэлп.
Условия: составить алгоритм разветв. структуры
Нужна программа на языке паскаль

Answer 1

program gt;
var x,y:real;
begin
readln(x);
if(x>1)then y:=x*x+x+3 else y:=x+1;
writeln(y);
end.

Answer 2

3-е задание

Answer 3

Готово...............

aa2ffff6b6191743df4bd70f04fed185.pas

Answer 4

у тебя в var нету 'y' а остально всё ок

Answer 5

а нет .всё ок

Answer 6

спасибо большое ребят, вы лучшие!!!

Answer 7

теперь слово "программист" ассоциируется с вами :D

Answer 8

еще 1 задание ребят))) спасибо