На языке программирования 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. Опишите на естественном языке, что происходит после ее выполнения.

Question

Арсений Мартынов

Информатика

4 августа, 01:12

На языке программирования 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. Опишите на естественном языке, что происходит после ее выполнения.

+1

Ответы (1)

Знаешь ответ на этот вопрос?

Екатерина Фомичева · Answer 1

1) var

P, N: real;

begin

read (P);

read (N);

if (P
P:=N+P;

end;

end.

2) Данная программа считывает числа F и G,

если F больше G, то присваивает G разность G-F, F сумму G и F

в противном случае F присваивается разность F-G, а G сумма G b F,

далее выводятся значения F и G.