Предмет: Информатика,
автор: sunshinecreative
НУЖНА ПРОГРАММА В ПАСКАЛЕ, ПОЖАЛУЙСТА ❤️
Приложения:
Ответы
Автор ответа:
0
var a,b,c:integer;
begin
randomize;
a:=random(100)+1;
b:=random(100)+101;
c:=random(50)+201;
writeln('Выигрышный билет для молодежи под номером ',a);
writeln('Выигрышный билет для взрослых под номером ',b);
writeln('Выигрышный билет для стариков под номером ',c);
end.
begin
randomize;
a:=random(100)+1;
b:=random(100)+101;
c:=random(50)+201;
writeln('Выигрышный билет для молодежи под номером ',a);
writeln('Выигрышный билет для взрослых под номером ',b);
writeln('Выигрышный билет для стариков под номером ',c);
end.
Похожие вопросы
Предмет: Химия,
автор: mikan7
Предмет: Математика,
автор: evelinaboll403
Предмет: Математика,
автор: sdeve18
Предмет: Биология,
автор: mimimiii
Предмет: Математика,
автор: Дисана