Найдите ошибки в следующих программах:

Program int_r;

Var a, x:integer;

b, c:real;

Begin

a:=10;

b:=5.2;

x:=b div 2;

c:=round (x) ;

End.

Program int_r1;

Var a, c:integer;

b, d:real;

Begin

a:=25;

b:=a/2;

c:=sqr (a) ;

d:=a mod 10;

End.

Question

Информатика

Викта

17 апреля, 03:50

Найдите ошибки в следующих программах:

Program int_r;

Var a, x:integer;

b, c:real;

Begin

a:=10;

b:=5.2;

x:=b div 2;

c:=round (x) ;

End.

Program int_r1;

Var a, c:integer;

b, d:real;

Begin

a:=25;

b:=a/2;

c:=sqr (a) ;

d:=a mod 10;

End.

+3

Ответы (1)

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

Антоша · Answer 1

Program int_r;

Var

a, x:integer;

b, c:real;

readln

a:=10;

b:=5.2;

Begin

x:=b div 2;

c:=round (x) ;

End.

(я так думаю, но не факт, что правильно!)

Program int_r1;

Var

a, c:integer;

b, d:real

readnl

a:=25;

Begin

b:=a/2;

c:=sqr (a) ;

d:=a mod 10;

End.

Найдите ошибки в следующих программах:Program int_r;Var a, x:integer;b, c:real;Begina:=10;b:=5.2;x:=b div 2;c:=round (x) ;End.Program int_r1;Var a, c:integer;b, d:real;Begina:=25;b:=a/2;c:=sqr (a) ;d:=a mod 10;End.

Найдите ошибки в следующих программах:

Program int_r;

Var a, x:integer;

b, c:real;

Begin

a:=10;

b:=5.2;

x:=b div 2;

c:=round (x) ;

End.

Program int_r1;

Var a, c:integer;

b, d:real;

Begin

a:=25;

b:=a/2;

c:=sqr (a) ;

d:=a mod 10;

End.