Составь программу, которая вводит 2 целых числа и выводит на экран модуль разности этих чисел
Ответы на вопрос
Ответил OWIkirilka
0
var a, b, i, c :integer;
begin
read (a, b); // вводим a и b
for i:=1 to 5 do
begin
c:=random(b-a)+a; // присваиваем рандомные числа в заданномпромежутке
writeln (c); // выводим число
end;
end.
begin
read (a, b); // вводим a и b
for i:=1 to 5 do
begin
c:=random(b-a)+a; // присваиваем рандомные числа в заданномпромежутке
writeln (c); // выводим число
end;
end.
Новые вопросы