Задание 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.
Program TR;
var a: integer;
begin
write(введи число);
readln(a);
a:=a*a;
write(a=, a, умница)
end.
2+10=12
x < 20
y=12/2
Ответ: 6
Оцени ответ
