Задание 2. Исправить ошибки программы и вывести вместе с ответом слово «умница».
Program TR
Var a:– integer;
Begin write( введи число )
read ( a)
a =a*a
write (‘a=’, a)
End
1) Что получиться в результате выполнения программы, если было введено число 2 ?
program T;
Var y,x: integer;
begin read (x);
x:=x+10;
if x>20 then y:=x*x
else y:=x/2;
write (y);
end.