Составте программу на языке программирования Паскаль АБС. Даны 3 числа. Найдите среднее арифметическое этих чисел
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.
Аа, я понял что вы имели ввиду.
Можно писать любой текст в ''
я все правильно сделал?
Да.
у меня завтра тест просто я 2 двойки получил ( если еще раз получу 2 за четверть
она все поменяет и дала на дом
Просто перепишите эту программу и ничего не изменяйте.
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.
так же да?
спасибо вам большое