ПОМОГИТЕ С ПАСКАЛЕМ, Я НЕ РАБОТАЛА С НИМ Задание 12. Написать ** языке Тurbo Pascal...

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

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


Информатика (55 баллов) | 35 просмотров
Дан 1 ответ
0 голосов

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

(170 баллов)
0

немного тебя не понял

0

я на паскале работал в последний раз когда в шк учился и что-то маленько затупил

0

тогда вопрос в другом, что требуется в задании? просто заполнить пробелы?