Ответ:
var a: integer;
begin
a:=random(101);
writeln(a);
if (a<50) then
writeln('Чтобы получить 50, необходимо прибавить к числу ',50-a)
else
writeln('Чтобы получить 50, необходимо убавить число на ',a-50)
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
var a: integer;
begin
a:=random(101);
writeln(a);
if (a<50) then
writeln('Чтобы получить 50, необходимо прибавить к числу ',50-a)
else
writeln('Чтобы получить 50, необходимо убавить число на ',a-50)
end.