Условие задания:

4 Б.
Составим программу обмена местами двух чисел c=3,d=17.
 
program obmenDan;
var c,d:integer;
procedure obmen ( a,b:integer);
var m:integer;
begin
m:=a; a:=b; b:=m;
writeln(a,b);
end;
begin
writeln ('Введите 2 числа: ');
readln(c,d);
obmen(c,d);
writeln(c,' ',d);
end.
 
Проанализируй и выбери верные ответы.
 
1.png 3 2.png17 3.png3 4.png17
 
После выполнения программы:
 
1.png  2.png  3.png  4.png 

Для того чтобы решать задания, необходимо зарегистрироваться.

Быстрая регистрация: