Предмет: Информатика,
автор: fleshkaplay
Напишите программу, которая вводит два вещественных числа, a и b (a
fleshkaplay:
секунду
var a,b,q:double;
begin
read(a,b);
a:= random*10;
b:= random*20+10;
q:=random*(b-a)+a;
writeln(q);
end.
Ответы
Автор ответа:
1
Ответ:
Вот
Объяснение:
Program teach;
var a, b: real; i: integer;
begin
randomize;
readln(a,b);
for i:= 1 to 5 do
write((Random()*(b-a)+a):0:3, ' ');
end.
Автор ответа:
1
Пол программы всё равно было лишней)
program ss;
var a,b,q:real;
i : integer;
begin
read(a,b);
randomize;
for i:= 1 to 5 do
begin
q:= Random()*(b-a)+a;
writeln(q);
end;
end.
Интересные вопросы
Предмет: Русский язык,
автор: zelenkinasofya
Предмет: Русский язык,
автор: Irka131
Предмет: Английский язык,
автор: sevaraulemil
Предмет: Химия,
автор: AlenaShust
Предмет: Алгебра,
автор: 11303anwer