Задание 2. Исправить ошибки программы и вывести вместе с ответом слово "умница".

Program TR

Var a: - integer;

Begin write (введи число)

read (a)

a = aa

write ('a=', a)

End

1) Что получиться в результате выполнения программы, если было введено число 2?

program T;

Var y, x: integer;

begin read (x) ;

x:=x+10;

if x>20 then y:=xx

else y:=x/2;

write (y) ;

end.

Question

Информатика

Тося

7 марта, 06:27

Задание 2. Исправить ошибки программы и вывести вместе с ответом слово "умница".

Program TR

Var a: - integer;

Begin write (введи число)

read (a)

a = aa

write ('a=', a)

End

1) Что получиться в результате выполнения программы, если было введено число 2?

program T;

Var y, x: integer;

begin read (x) ;

x:=x+10;

if x>20 then y:=xx

else y:=x/2;

write (y) ;

end.

+4

Ответы (1)

Знаете ответ на вопрос?

Володяха · Answer 1

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