Впаскале! написать два алгоритма ввода трех вещественных переменных a, b, c и обмена значений в ячейках памяти a в в, в в с, с в а. первый алгоритм с применением дополнительной ячейки памяти и второй алгоритм без использования дополнительной ячейки.
1.Подключается модуль, отвечающий за графику 2.Начало объявления переменных 3,Объявляется переменная "а", с числовым типом 4.Начало программы 5.Необходимо ввести значение переменной "а" 6.Перемещает указатель (начальную точку) на координаты а,1 где а - координата по оси Х, 1 - координата по оси Y 7.Рисует окружность с центром в точке x = а+а div 2,y = 1 где div целочисленное деление. То есть если а=5, то 5+5 div 2 будет равно 5. И третий параметр это радиус, то есть радиус равен а div 4. 8. Функция linto(x,y) рисует прямую линию в точку с координатами x и y. Причем рисует из точки, в которой указатель был до этого. То есть в данном случае из точки в центре окружности. Я думаю дальше можно догадаться, так как все функции описал. Программа написана на языке Pascal и она рисует что-то.
Подготовку и размещение информации по государственным услугам ответственными органами государственной власти в единой системе реестров; информирование граждан и организаций о порядке предоставления государственных услуг; обеспечение приема и регистрации заявлений от граждан и организаций в органах государственной власти, через МФЦ и порталы государственных услуг, формирование выписки из электронного журнала регистрации и контроля над обращениями; идентификацию граждан и организаций (дистанционно); проведение электронных платежей за платные государственные услуги (дистанционно); передачу принятых заявлений от граждан в ведомственные системы; реализацию досудебного (внесудебного) обжалования гражданами и организациями решений органов государственной власти при получении гражданином неудовлетворительного решения.
var
a,b,c,d:real;
begin
readln(a,b,c);
d:=a;
a:=c;
c:=b;
b:=d;
writeln(a,' ',b,' ',c);
end.
2)
var
a,b,c:real;
begin
readln(a,b,c);
writeln(c,' ',a,' ',b);
end.