Помогите Нужно нарисовать лягушку через программу паскаль abc
5-9 класс
|
uses graphABC;
begin
line(40,40,180,40);
line(40,40,110,0);
line(110,0,180,40);
line(40,40,110,80);
line(110,80,180,40);
setbrushcolor(clred);
circle(20,40,20);
circle(200,40,20);
floodfill(110,30,clblue);
floodfill(110,60,clgreen);
end.
Другие вопросы из категории
Алгоритмический язык
Бейсик
Паскаль
алг
нач
цел s, k
s := 0
нц для k от 7 до 11
s := s+11
кц
вывод s
кон
DIM k, s AS INTEGER
s = 0
FOR k = 7 TO 11
s = s+11
NEXT k
PRINT s
Var s,k: integer;
Begin
s := 0;
for k := 7 to 11 do
s := s+11;
writeln(s);
End.
2.Сформировать одномерный массив из 30 элементов (задаются ГСЧ-рандомно) из интервала -3..3. Массив вывести.Найти номер положительных элементов и их сумму чисел.
Читайте также
-Бангладеш;
-Буркина-Фасо;
-Великобритания;
-Греция;
-Грузия;
-КНДР;
-Либерия;
-Куба;
-США;
-Швейцария;
И программы желательно должны быть попроще)))))
исходящие данные введите с клавиатуры. через программу паскаль 7.0 плиз очень надо
нужно нарисовать елочку в программе кумир, с помощью чертёжника
просто напишите алгоритм
Cоставить программу, сообщающую о возможности
построения параллелограмма из отрезков X,Y,Z,T
Данные
1 , 2 , 1 , 2 можно
7 , 5 , 6 , 5 нельзя
Пожалуйста
Срочно
Надо
1).найти все четырехзначные числа,делящиеся на 27.
2).дан массив целых чисел,состоящий из 20 элементов.Заполнить его случайными числами и найти количество элементов массива. значения которых больше заданного числа и кратны 5.