ПОМОГИТЕ С ИНФОРМАТИКОЙ ПОЖАЛУЙСТА. ПАСКАЛЬ . Написать ** языке Тurbo Pascal программу...

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

ПОМОГИТЕ С ИНФОРМАТИКОЙ ПОЖАЛУЙСТА. ПАСКАЛЬ .
Написать на языке Тurbo Pascal программу для следующей задачи: Ввести три двухзначных числа целого типа. Найти среднее арифметическое этих чисел и вывести его с использованием формата по умолчанию и явно заданного формата.
Vara,b,c:integer;
D:real;
Begin
WriteLn(‘Vveditea,b,c’);
ReadLn(a,b,c);
d:=(a+b+c)/3;
WriteLn(‘d= ‘,d);
WriteLn(‘d= ‘,d:5:2);
End.
Исходные данные a=______
b=______
c=______


Информатика (55 баллов) | 47 просмотров
0

А в чём вопрос?

Дан 1 ответ
0 голосов

4 и 6 среднее 5 4+5+6:3=15

(42 баллов)
0

а=4 b=5 c=6

0

пожалуйста