Урок 14 задача 2
Primary tabs
Напишите процедуру, которая выводит на экран сумму трёх целых чисел.
program project1; var num1,num2,num3,res:integer; procedure sum(num1,num2,num3:integer); begin res:=num1+num2+num3; end; begin write('Введите первое число: '); readln(num1); write('Введите второе число: '); readln(num2); write('Введите третье число: '); readln(num3); sum(num1,num2,num3); writeln('Результат: ', res); readln(); end.
- Log in to post comments
- 1743 reads
vedro-compota
Wed, 12/08/2021 - 18:53
Permalink
не использовать глобальную
не использовать глобальную переменную
_____________
матфак вгу и остальная классика =)
alexander263
Sun, 12/12/2021 - 12:50
Permalink
Исправлено
vedro-compota
Sun, 12/12/2021 - 13:20
Permalink
засчитано
засчитано
_____________
матфак вгу и остальная классика =)