Program project; //объявляем название программы
Var //объявляем переменные
a: integer; //integer - целое число
Begin //начинаем собственно программу
>><span>a:=1</span>; //первое число будет состоять из единиц
>>While a <> 10 do //начинаем цикл, который будет длиться, пока "а" не достигнет 10
>>Begin //начало цикла
>>>>Writeln (a, a, a); //записываем "а" трижды
>>>>a:=a+1; //прибавляем к "а" единицу
>>End; //конец цикла
End. //конец программы
P. S. Вместо ">>" пиши пробелы, просто они здесь не отображаются
A = 5.
B = 4.
A = B + 4 = 4 + 4 = 8.
Ответ: A = 8, B = 4.
k:=0;
m:=0;
for i:=1 to 40 do begin
if (a[i]>99) and (a[i]<1000) and (a[i]mod2<>0) then
k:=k+1;
m:=m+a[i];
end;
writeln(m/k);
end.
Словесная модель- это описания явлений, предметов, событий, процессов на естественных языках
7*1=7 7*2=14 7*3=21 7*4=28 7*5=35 7*6=42 7*7=49 7*8=56 7*9=63