Предмет: Информатика,
автор: ezidzegadky
Составьте программу на языке Паскаль по нахождению среднего арифметического 3 чисел! Срочно!!
Ответы
Автор ответа:
0
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.
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.
Похожие вопросы
Предмет: Алгебра,
автор: itslodjik
Предмет: Қазақ тiлi,
автор: Аноним
Предмет: Другие предметы,
автор: viktoriatokaeva3
Предмет: Литература,
автор: Лизочка01
Предмет: Биология,
автор: Unicor