Информатика, вопрос задал Iosifmelnikov , 8 лет назад

Составте программу на языке программирования Паскаль АБС. Даны 3 числа. Найдите среднее арифметическое этих чисел

Ответы на вопрос

Ответил estengseant
0
program f1cda001;
var a, b, c: Integer;
begin
writeln('Введите 1 число:');
readln(a);
writeln('Введите 2 число:');
readln(b);
writeln('Введите 3 число:');
readln(c);
writeln('Среднее арифметическое чисел: ',(a+b+c)/3);
end.
Ответил Iosifmelnikov
0
она все поменяет и дала на дом
Ответил estengseant
0
Просто перепишите эту программу и ничего не изменяйте.
Ответил Iosifmelnikov
0
program f1cda001;
var a, b, c: Integer;
begin
writeln('123:');
readln(a);
writeln('124:');
readln(b);
writeln('121:');
readln(c);
writeln('Среднее арифметическое чисел: ',(a+b+c)/3);
end.
Ответил Iosifmelnikov
0
так же да?
Ответил Iosifmelnikov
0
спасибо вам большое
Новые вопросы