Question

Запишите алгоритм "для" в алгоритме "пока". Запишите число, которое будет выведено в результате выполнения программы

Answer 1

var k, s:integer;

begin

k:=6;

while k<=10 do begin

 s:=s+10;

 k:=k+1;

end;

writeln(s);

end.