Предмет: Информатика,
автор: Drago987
Помогите написать программу для Паскаля.
1. Написать программу нахождения произведения n чисел.
2. Написать программу, рисующую на экране 5 цветных
квадратов и 5 цветных кругов. Размеры квадратов и окружностей, их расположение
на экране и цвет окраски задаются с помощью Random. Квадраты и круги не должны накладываться друг на
друга.
Ответы
Автор ответа:
0
var a,i,b:longint;
begin
b:=1;
readln(a);
for i:=2 to a do
b:=b*i;
writeln(b);
end.
вторую извини, не знаю.
begin
b:=1;
readln(a);
for i:=2 to a do
b:=b*i;
writeln(b);
end.
вторую извини, не знаю.
Интересные вопросы
Предмет: Алгебра,
автор: timat06v
Предмет: Русский язык,
автор: diliruh410
Предмет: Қазақ тiлi,
автор: SimkaMoon
Предмет: Математика,
автор: Macarov
Предмет: Биология,
автор: ksenon666