Написать программу на языке паскаль, которая используя цикл , строит семейство прямоугольников случайного цвета?

Alesyakundas 17 янв. 2020 г., 05:24:34

Uses GraphABC ;

var i : integer ; arr : array [1.

6] of color ;

begin arr[1] : = clPink ; arr[2] : = clRed ; arr[3] : = clGreen ; arr[4] : = clBlue ; arr[5] : = clYellow ; arr[6] : = clOrange ; for i : = 0 to 59 do begin SetBrushColor(arr[random(6) + 1]) ; FillRectangle((i mod 16) * 40, (i div 16) * 20, (i mod 16) * 40 + 39, (i div 16) * 20 + 19) ; sleep(20) ; end ;

end.

Ksyushagordien 4 окт. 2020 г., 08:14:12 | 10 - 11 классы

Циклические алгоритмы и разработка программыЦиклы с параметрамиРазработать схему алгоритма (блок схему), написать программный код на языке паскаль, используя оператор FOR?

Циклические алгоритмы и разработка программы

Циклы с параметрами

Разработать схему алгоритма (блок схему), написать программный код на языке паскаль, используя оператор FOR.

Знания2013 25 янв. 2020 г., 20:59:36 | 10 - 11 классы

Написать программу, которая выводит таблицу квадратов первых пяти целых положительных нечетных чисел (используя цикл с параметром)?

Написать программу, которая выводит таблицу квадратов первых пяти целых положительных нечетных чисел (используя цикл с параметром).

В паскале Потом такую же только цикл с предусловием, и еще одну цикл с постусловием.

Evishekova37 12 мая 2020 г., 17:39:06 | 10 - 11 классы

Паскаль?

Паскаль.

Помогите, пожалуйста!

Нужно написать программу, которая в левом верхнем углу экрана рисует прямоугольник размером АхВ зеленого цвета и равномерно заполняет его 100 случайными точками белого цвета.

Ruan21 15 апр. 2020 г., 22:24:16 | 10 - 11 классы

На вход программе подается число n?

На вход программе подается число n.

Программа формирует n случайных чисел и находит сумму тех из них, которые больше 5 но меньше 100.

Написать программу на любом языке.

Лучше паскаль.

Gevork65 8 июл. 2020 г., 03:50:21 | 10 - 11 классы

Циклы с постусловиями?

Циклы с постусловиями.

Разработать схему алгоритма и написать программный код на языке Паскаль.

Используя оператор Repeat Until.

Dadaev241 25 янв. 2020 г., 23:11:11 | 5 - 9 классы

Найти сумму натуральных чисел от 1 до 50?

Найти сумму натуральных чисел от 1 до 50.

Программу написать на языке паскаль, по теме "вложенность цикла".

6737960 14 июн. 2020 г., 16:12:49 | 10 - 11 классы

Помогите с паскалем))Для вот этой программы(файл прикреплен документом)Нужно 1) Решить задачу используя цикл с предусловием2) Решить задачу используя цикл с постусловием?

Помогите с паскалем))

Для вот этой программы(файл прикреплен документом)

Нужно 1) Решить задачу используя цикл с предусловием

2) Решить задачу используя цикл с постусловием.

Само задание которое в файле звучит так 1) Написать программу, которая вычисляет сумму первых n членов ряда 1, 3, 5, 7, … Количество суммируемых членов ряда задается во время работы программы (используя цикл с параметром).

Настя695 3 июн. 2020 г., 22:58:21 | 10 - 11 классы

Написать программу, которая вычисляет факториал числа, введенного с клавиатуры, используя цикл с постусловием?

Написать программу, которая вычисляет факториал числа, введенного с клавиатуры, используя цикл с постусловием.

Язык - pascal.

Кирилл881 10 окт. 2020 г., 13:15:58 | 5 - 9 классы

Написать программу в ABC паскале с циклом?

Написать программу в ABC паскале с циклом.

Настюха16478637 31 окт. 2020 г., 05:25:32 | 5 - 9 классы

Запишите на языке Паскаль программу, которая для двухзначного случайного числа определяет произведение его цифр?

Запишите на языке Паскаль программу, которая для двухзначного случайного числа определяет произведение его цифр.