77=7*11 т.е. 7+11=18, в 5 а классе 18 учеников
Var s:string;
begin
write('Введите слово: ');
readln(s);
writeln('Количество символов = ',length(s));
end.
Пример:
Введите слово: клавиатура
Количество символов = 10
Описание математических методов обработки информации, формализация методик построения алгоритмов и реализации их на вычислительных машинах.
Условие - это a<16.
Операции присваивания - это не условие.
Program table;
var a,b,i,c,i1:integer;
begin
b:=1;
for i:=1 to 9 do
begin
a:=1;
for i1:=1 to 9 do
begin
c:=a*b;
a:=a+1;
write(c:3);
end;
writeln;
b:=b+1;
end;
<span>end.</span>