Question

ПОМОГИТЕ С ПАСКАЛЕМ, Я НЕ РАБОТАЛА С НИМ
Задание 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=______
Результат работы программы:_______

Answer 1

У тебя программа уже написана, не работать может только из за vara, поставь пробел "var a" ну и у readln и writeln напиши L маленькими