Решите задачу, используя язык программирования Паскаль: Даны три действительных положительных числа. Найти среднее арифметическое этих чисел. ПЛИЗ до завтра надо

Решите задачу, используя язык программирования Паскаль: Даны три действительных положительных числа. Найти среднее арифметическое этих чисел. ПЛИЗ до завтра надо
Гость
Ответ(ы) на вопрос:
Гость
program zadacha; var a,b,c,s:REAL; begin writeln('Enter a,b,c:'); readln(a); readln(b); readln(c); s:=0; s=(a+b+c)/3; writeln('Среднее арифметическое', s); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы