Ответ:
Клавиша, которая при нажатии перелистывает курсор/страницу в начало документа/страницы
Ничего не изменится. все останется как и есть
Program maxim;
const n=15 {15 студентов};
var a:array[1..n] of integer;
i,max:integer;
begin
randomize;
for i:=1 to n do begin
a[i]:=random(10){кол-во баллов до 15};
write (a[i],' ');
end;
max:=a[1];
for i:=2 to n do begin
if a[i]>max then max:=a[i];
end;
writeln;
writeln (max);<span>
end.</span>
Ну ответ вроде бы г. если правильно то пожалуйста
Ты говоришь:
пока i < длины строки S делай:
если S с индексом i = "." то k++
Все
Ты не меняешь "i", он у тебя всегда 1й элемент смотрит)
Как должно быть:
------------------
While i<=length(s) do begin
If s[i]='.' then
k:=k+1;
inc(i);
end;
----------------------