Найди верный ответ на вопрос по предмету Информатика, если вы не получили ответа или никто не дал верного ответа, то рекомендуется воспользоваться поиском и попытаться найти ответ на свой вопрос среди похожих запросов.
Новые вопросы по предмету Информатика:
Program zadanie;
Var a,b,c:real;
Begin
Writeln('Введите значения a,b,c');
Readln(a,b,c);
a:=(a+b+c)/3;
Writeln('Среднее арифметическое чисел a,b,c=',a);
End.