ПОМОГИТЕ С ПАСКАЛЕМ, Я НЕ РАБОТАЛА С НИМ Задание 12.  Написать на языке Тurbo Pascal программу для следующей задачи: Ввести три двухзначных числа целого типа. Найти среднее арифметическое этих чисел и вывести его с использовани...

ПОМОГИТЕ С ПАСКАЛЕМ, Я НЕ РАБОТАЛА С НИМ Задание 12.  Написать на языке Т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=______ Результат работы программы:_______
Гость
Ответ(ы) на вопрос:
Гость
у тебя программа уже написана, не работать может только из за vara, поставь пробел "var a" ну и у readln и writeln напиши L маленькими
Не нашли ответ?
Ответить на вопрос
Похожие вопросы