Регистрация
shamshievoleg
16.05.2020 12:13
Информатика
Есть ответ 👍

Напишите программу, которая вводит натуральные числа a , b и n , и выводит на экран n псевдослучайных целых чисел на отрезке [ a , b ] . входные данные входная строка содержит три числа, разделённые пробелами: границы отрезка a и b и требуемое количество чисел n . гарантируется, что a ≤ b . выходные данные программа должна вывести n случайных целых чисел в одной строке, разделив их пробелами. примеры: входные данные 10 20 5 выходные данные 10 10 19 12 13 ! язык pascalabc ! ! без while, a через for !

185
249
Посмотреть ответы 2

Ответы на вопрос:

liliiayukhno1
liliiayukhno1
4,5(95 оценок)

var a,b,n,i: integer;

begin

write ('введите границы отрезка: ');

readln (a,b);

write ('введите требуемое количество чисел: ');

readln (n);

for i: =1 to n do write(random(b-a+1)+a,'   ')

end.

SUPERMODEL
SUPERMODEL
4,4(3 оценок)
Var a,b,c,d,x: integer; begin x: =0; wirteln('введите число 1'); readln(a); wirteln('введите число 2'); readln(b); wirteln('введите число 3'); readln(c); wirteln('введите число 4'); readln(c); if a  div 2 = 0 then x: =x+1; if b  div 2 = 0 then x: =x+1; if c  div 2 = 0 then x: =x+1; if d  div 2 = 0 then x: =x+1; writeln ('четных чисел=  ',x) end.

Популярно: Информатика