Question

На языке программирования Pascal реализовать следующие задачи:

1) Даны 2 переменные, в которые пользователь вводит два случайных числа. Если числа упорядочены по возрастанию, то ничего с ними не делать, в противном случае меньшему из них присвоить их сумму.

2) Перед вами текст программы:

Program Е;

var

F, G:real;

begin

writeln('Vvedi');

read(F);

writeln('Vvedi');

read(G);

if F
begin

=G-F;

F:=F+G;

end

else

begin

F:=F-G;

G:=G+F;

end;

Writeln('1= ', F, ' 2= ', G);

end.

Опишите на естественном языке, что происходит после ее выполнения.

Answer 1

1)program p;
var a, b:integer;
writeln:('vvedi a,b');
readln(a,b);
begin
if a>=b than b:=a+b;
end.