Составьте программу для нахождения среднего арифметического двузначных чисел, кратных 3, с использованием параметрического цикла. ответ прикрепите в виде файла в среде pascalabc.

nikzyryanov02 nikzyryanov02    3   02.06.2019 18:00    1

Ответы
Dobriyboy Dobriyboy  03.07.2020 11:59
var i,k,c:integer;
begin
k:=0;
c:=0;
for i:=10 to 99 do
begin
if ((i mod 3)=0) then
begin
k:=k+i;
c:=c+1;
end;
end;
writeln (k/c);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика