Автор Алексей Сорокин задал вопрос в разделе Другие языки и технологии
задача в паскале. Найти среднее арифметическое 4 чисел введенных с клавиатуры и получил лучший ответ
Ответ от Алексей Сутягин[гуру]
var a,b,c,d: integer; begin readln(a); readln(b); readln(c); readln(d); writeln((a+b+c+d)/4); end
Ответ от (О.о)[гуру]
алгоритм ввод a,b,c,d e=(a+b+c+d)/4 вывод e все остальное вам рассказывали и показывали на уроках
алгоритм ввод a,b,c,d e=(a+b+c+d)/4 вывод e все остальное вам рассказывали и показывали на уроках
Ответ от Nnn7[гуру]
var a,k:integer; s:real; begin s:=0; for k:=1 to 4 do begin write('vvedite',k,'-e chislo: ');readln(a);s:=s+a end; write('Summa chisel= ',s,' srednee arifmeticheskoe: ',s/4); readln end.
var a,k:integer; s:real; begin s:=0; for k:=1 to 4 do begin write('vvedite',k,'-e chislo: ');readln(a);s:=s+a end; write('Summa chisel= ',s,' srednee arifmeticheskoe: ',s/4); readln end.
Ответ от 22 ответа[гуру]
Привет! Вот подборка тем с похожими вопросами и ответами на Ваш вопрос: задача в паскале. Найти среднее арифметическое 4 чисел введенных с клавиатуры