Найдите все ошибки в программе и исправьте их:

Var i, j, k:integer;

Begin

Read ('введитеk') ;

i:=20;

j:=k/i;

Writeln (j =, j) ;

End.

Question

Информатика

Агафа

30 августа, 14:38

Найдите все ошибки в программе и исправьте их:

Var i, j, k:integer;

Begin

Read ('введитеk') ;

i:=20;

j:=k/i;

Writeln (j =, j) ;

End.

+1

Ответы (2)

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

Ритуша · Answer 1

Program zadacha;

Var I, j, k:real;

Begin

Writeln ('введите k') ;

Readln (k) ;

I:=20;

J:=k/I;

Writeln ('j=', j) ;

End.

Генюся · Answer 2

program mi_sidim_na_kliovam_saite666;

Var i, j, k:real;

Begin

write ('введите k') ;

readln (i, j, k) ;

i:=20;

j:=k/i;

Writeln ('j = ', j) ;

End.

Найдите все ошибки в программе и исправьте их:Var i, j, k:integer;BeginRead ('введитеk') ;i:=20;j:=k/i;Writeln (j =, j) ;End.

Найдите все ошибки в программе и исправьте их:

Var i, j, k:integer;

Begin

Read ('введитеk') ;

i:=20;

j:=k/i;

Writeln (j =, j) ;

End.