Встречено 'to', а ожидался оператор

Program noname1;

var i, s:integer;

begin

writeln ('Введите S') ;

readln (s) ;

While i = 1 to 10 do

begin

S: = i7;

end;

writeln (i,' 7=', s) ;

end.

Что не так?

Question

Информатика

Домнина

22 декабря, 17:56

Встречено 'to', а ожидался оператор

Program noname1;

var i, s:integer;

begin

writeln ('Введите S') ;

readln (s) ;

While i = 1 to 10 do

begin

S: = i7;

end;

writeln (i,' 7=', s) ;

end.

Что не так?

+1

Ответы (1)

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

Иулий · Answer 1

Место цикла while нужно использовать цикл for

Program noname1; var i, s:integer; beginwriteln ('Введите S') ; readln (s) ; for i: = 1 to 10 dobeginS: = i*7; end; writeln (i,' * 7=', s) ; end.

Вот так должно получится.

Встречено 'to', а ожидался операторProgram noname1;var i, s:integer;beginwriteln ('Введите S') ;readln (s) ;While i = 1 to 10 dobeginS: = i*7;end;writeln (i,' * 7=', s) ;end.Что не так?

Встречено 'to', а ожидался оператор

Program noname1;

var i, s:integer;

begin

writeln ('Введите S') ;

readln (s) ;

While i = 1 to 10 do

begin

S: = i7;

end;

writeln (i,' 7=', s) ;

end.

Что не так?