Помогите, пожалуйста, с информатикой!!! Очень надо! Надо написать задачу в паскале...

0 голосов
24 просмотров

Помогите, пожалуйста, с информатикой!!! Очень надо!

Надо написать задачу в паскале

Поменяйте между собой значения двух переменных, использую третью


Информатика (58 баллов) | 24 просмотров
Дан 1 ответ
0 голосов

Program perestanovka;

Uses CRT

Var

a,b,r:integer;

Begin

clrscr;

write('a=>');

readln(a);

write('b=>');

readln(b);

r:=a;

a:=b;

b:=r;

writeln('a =>',a)

writeln('b =>',b)

readln;

End.
Както так

(208 баллов)
0

спасибо большое