Помогите САМОСТОЯТЕЛЬНО. Ввести с клавиатуры значения для А, В, С. Поменять их местами: А = больше В, В = больше С, С = больше А. Комментарий: в программе будет объявлено 4 переменных, обмен значений произведем за 4 шага.
Помогите САМОСТОЯТЕЛЬНО. Ввести с клавиатуры значения для А, В, С. Поменять их местами: А => В, В => С, С => А. Комментарий: в программе будет объявлено 4 переменных, обмен значений произведем за 4 шага.
Гость
Ответ(ы) на вопрос:
ГостьProgram gf;
uses crt;
var a,b,c,d:integer;
begin
writeln('Напишите числа');
readln(a,b,c);
d:=b;
b:=c;
c:=a;
a:=d;
writeln(a,b,c);
end.
Не нашли ответ?
Похожие вопросы