Привет! Меня зовут Илья, и я программирую на Pascal. Я хотел бы поделиться с вами программой, которую я написал, чтобы найти сумму, произведение и среднее арифметическое трех целых чисел, введенных с клавиатуры. Для этого я использую язык программирования Pascal.
Давайте рассмотрим программу⁚
program calculation;
var
num1, num2, num3⁚ integer;
sum, product, average⁚ real;
begin
writeln('Введите первое число⁚');
readln(num1);
writeln('Введите второе число⁚');
readln(num2);
writeln('Введите третье число⁚');
readln(num3);
sum ⁚ num1 num2 num3;
product ⁚ num1 * num2 * num3;
average ⁚ sum / 3;
writeln(num1, ' ', num2, ' ', num3, '', sum);
writeln(num1, '*', num2, '*', num3, '', product);
writeln('(', num1٫ ' '٫ num2٫ ' '٫ num3٫ ')/3='٫ average⁚0⁚6);
end.Программа начинается с инициализации переменных⁚ num1, num2 и num3. Затем она запрашивает у пользователя ввод трех целых чисел с помощью команды readln.
После ввода чисел программа вычисляет сумму, произведение и среднее арифметическое с помощью операций сложения, умножения и деления соответственно. Результаты сохраняются в переменных sum, product и average.
Наконец, программа выводит результаты на экран с использованием оператора writeln. Сумма выводится в формате ″число1 число2 число3 сумма″, произведение в формате ″число1 * число2 * число3 произведение″, а среднее арифметическое в формате ″(число1 число2 число3)/3 среднее″.
Теперь, если мы запустим эту программу и введем числа 4, 5 и 7, мы получим следующий результат⁚
4 5 716
4*5*7140
(4 5 7)/3=5.333333
Я надеюсь, что эта программа поможет вам на пути к изучению языка программирования Pascal и решению задач в нем. Удачи в ваших программирующих начинаниях!