<span>var
i, j, a, b: integer;
s: real;
begin
write('Введите a: '); readln(a);
write('Введите b: '); readln(b);
for i := a to b do
if (i mod 3) = 0 then
begin
s := s + i;
inc(j);
end;
s := s / j;
writeln('Ответ: ', s);
<span>end.</span></span>
Пограммирование
енавориммаргоп
пграммироване
еавориммаргп
праммировае
евориммарп
паммирове
еориммап
пммирое
ериммп
пмире
еимп
пие
еп
п
Ответ: П
Ответ:
4
Объяснение:
Надо найти V2/V1.
x - кол-во символов. По условию x1=x2=x.
V2=x*16;
V1=x*4
Делим уравнения и получаем: V2/V1=4