Pascal, помогите пожалуйста, уже достало, честное слово... Ну не моё это.
1) Напишите программу в которой на экран выводится строка из трех случайных прописных латинских символов.
Пример вывода:
Паскаль: «Я сгенерировал строку: fke»

2)Напишите программу, в которой с клавиатуры вводится ширина диапазона
случайных чисел и выводится случайное число в диапазоне от 0 до N (где N –
введенное с клавиатуры число)
Пример вывода:
Введите ширину диапазона случайных чисел: 150
Паскаль: «Я сгенерировал число: 48»

3)Напишите программу, в которой с клавиатуры вводятся начальное и
конечное значения диапазона случайных чисел и выводится случайное число в
диапазоне от M до N (где M и N – введенные с клавиатуры числа)
Пример вывода:
Введите начало диапазона случайных чисел: 50
Введите конец диапазона случайных чисел: 150
Паскаль: «Я сгенерировал число: 89»

4)Напишите программу для случайного определения победителя школьной
лотереи. В лотерее участвовали билеты с тремя двузначными числами.
На экран последовательно выводится три двузначных числа.
Пример вывода:
Первое число выигрышного билета: 54.
Второе число выигрышного билета: 34.
Третье число выигрышного билета: 72.
Выиграл билет с комбинацией числе: 54 34 72.

program randstring;vara:array[1..3] of char; i:integer;beginwhile i < 3 do begini+=1;a[i]:=rand();write(a[i]:3);end;end. programm r;varn:integer;beginread(n);write(random(n));end. сложный вариант programm r;vara:array[1..1000]of integer;i,m,n:integer;beginread(n,m);i:=n;while i < m do begini+=1;a[i-n]:=i-n;end;i:=random(m-n)+1;write(a[i])end. while i < 3 do begini+=1;writeln(random(90)+10)end;