Задача 2 Урок 14
Primary tabs
Напишите процедуру, которая выводит на экран сумму трёх целых чисел.
program U14Z2; var a,b,c:integer; procedure sum(x,y,z:integer); begin write(x+y+z); end; begin writeln('vvedite a, b, c'); readln(a,b,c); sum(a,b,c); readln(); end.
- Log in to post comments
- 511 reads