Var
i,s:integer;
begin
s:=0;
for i:=1 to 5 do s:=s+i;
Writeln('for: ',s);
s:=0; i:=1;
while i<=5 do begin
s:=s+i;
i:=i+1
end;
Writeln('while: ',s);
s:=0; i:=1;
repeat
s:=s+i;
i:=i+1
until i>5;
Writeln('repeat: ',s)
end.
<u>Результат</u>
for: 15
while: 15
repeat: 15
Ответ:
Должна быть не маленькая англ. буква l, а большая англ. буква I
Объяснение:
<span>непрерывно изменяющийся во времени</span>
Номер 17, ответ 9
А ещё у вас ошибка вроде в 18