** языке программирования Pascal реализовать следующие задачи: 1) Даны 2 переменные, в...

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

На языке программирования 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.

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


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

1)
 var   
a,b : integer;       
begin 
readln (a,b);   
if a > b then   
b := a +b; 

writeln (a,' ',b);
end.

(2.6k баллов)
0

уверен в решении?

0

ну вроде да. можно вывод добавить

0

как?