Предмет: Информатика,
автор: wwwtugunovacr
Составить программу по нахождению среднего арифметического всех чисел от 10 до 45. в паскале
Ответы
Автор ответа:
0
uses crt;
var i,average,count:integer;
begin
for i:=10 to 45 do
begin
average:=average+i;
inc(count);
end;
writeln(average/count);
end.
var i,average,count:integer;
begin
for i:=10 to 45 do
begin
average:=average+i;
inc(count);
end;
writeln(average/count);
end.
Похожие вопросы
Предмет: Русский язык,
автор: Аноним
Предмет: Музыка,
автор: taego
Предмет: География,
автор: zulfiya9559
Предмет: Физика,
автор: хворушь