паскаль

[студент96]

подскажите в чем у меня ошибка, а то смотрю ни как не могу найти:

Program A33;
Var a, b: Integer;
Begin
Read (a, b); 
Y:=(a+b);
Y:=(a-b);
Write (y);
End.

Program praktika2;
Var x: Integer;
Begin
Read (x);
If (x <y) then z: = x
             Else z: = y;
Writeln (z);
End.

паскаль в них выводит ошибку, которую я исправляю и получаю куча других не понятных ошибок, где по сути их быть не должно. например ;.

[Stilet]

Я так понимаю текст ошибок из тебя нужно выбивать ретоной?
Ладно стелепатирую: Переменная Y не описана. И действительно a и b есть а У нет.

[студент96]

Сообщение от Stilet

Я так понимаю текст ошибок из тебя нужно выбивать ретоной?
Ладно стелепатирую: Переменная Y не описана. И действительно a и b есть а У нет.

а можете одну 1 прогу пока3ать как правильно надо написать?

[Stilet]

Var y,a, b: Integer;

Что тут еще показывать то???