Составьте программу на языке паскаль по нахождению среднего арифметического 3 чисел!

theanuta11 theanuta11    3   17.07.2019 20:20    2

Ответы
ta2001nja ta2001nja  21.09.2020 20:01
Program nevazhno;
var a,b,c:integer;
d:real;
begin
writeln('введите первое число');
readln(a);
writeln('введите второе число');
readln(b);
writeln('введите третье число');
readln(c);
d:=(a+b+c)/3;
writeln('среднее арифметическое=',d);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика