Написать ** языке паскаль программу ввода четырех целых чисел и вычисления их среднего...

0 голосов
129 просмотров

Написать на языке паскаль программу ввода четырех целых чисел и вычисления их среднего арифметического. протестировать программу на различных исходных данных и доказать правильность ее работы


Информатика (12 баллов) | 129 просмотров
Дано ответов: 2
0 голосов

Program fofgogjoj;
var
a,b,c,d:integer;
sr:real;
begin
Writeln('Введите 4 числа');
Readln(a,b,c,d);
sr:=(a+b+c+d)/4;
Writeln('Среднее арифмитическое чисел равно:',sr);
end.


Просто вводишь разные числа, а доказательством послужит нахождение этого же среднего арифмитического на листочке:)

(856 баллов)
0

Ответ 4.25 это не корявый ответ, т.к. конечная дробь

0

и этот вывод не отличится от твоего вывода

0

Сейчас точно скажу, какой вывод будет. И он будет отличаться

0

Вот вывод числа без атрибут нужных: 4.250000000000E+000 Вообще не корявый, да?

0

а ты пропустил эти числа через мой вариант программы?

0

в PascalABC.NET всё чотко

0

В этом детском паскале? тогда ясно.

0

да, на abc вывод нормальный. но в остальных это бы не прокатило

0 голосов

Program pr; Var a, b, c, d:integer;sr:real; begin write('a='); readln(a); write('b='); readln(b); write('c='); readln(c); write('d='); readln(d); writeln('Среднее арифметическое: ',(a+b+c+d)/4:0:2); end. Проверить можно и письменно. Данные вводишь сам.

(1.0k баллов)