ПОМОГИТЕ С ПАСКАЛЕМ, Я НЕ РАБОТАЛА С НИМ Задание 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 маленькими
Не нашли ответ?
Похожие вопросы