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

Panfilovich
Jul 14, 2019
У тебя программа уже написана, не работать может только из за vara, поставь пробел "var a" ну и у readln и writeln напиши L маленькими
91
Смежные вопросы: