сервис вопросов и ответовПаскаль... очень прошу!!! Помогите!!!!
5-9 класс|
|
Прикрепленные изображения
Vipsatpayeva
06 нояб. 2013 г., 0:17:58 (10 лет назад)
Evil2114
06 нояб. 2013 г., 2:13:51 (10 лет назад)
uses GraphABC;
var i: integer;
begin
SetPenColor(Color.Green);
for i := 1 to 12 do begin
Line(i*10, 10, (i+4)*10, 50);
Line(i*10, 50, (i+4)*10, 10);
end;
end.
Ответить
Другие вопросы из категории
Какое значение будет принимать Y после выполнения фрагментов программы 1. var x,y: y:=0 for x:=1 to 9 do y:=y+x;
writeln(y=,y);
END.
Вариант № 2 1)Подсчитать сумму квадратов всех отрицательных и четных чисел из 10 вводимых. 2) Даны натуральные числа от 35 до 87.
Найти и напечатать те из них, которые при делении на 7 дают остаток 1, 2 или 5.
3)Дано целое число а и натуральное (целое неотрицательное) число n. Вычислить а в степени n, используя в программе лишь операцию умножения.
4)Введите последовательность из n целых чисел. Найти наибольшее из всех отрицательных чисел. Вывести его значение и порядковый номер.
5)Вычислите: 99-97+95-93+91-89+....+7-5+3-1.
6)Доказать (путем перебора возможных значений), что для любых величин А, В, С типа Boolean следующая пара логических выражений имеет одинаковые значения (эквивалентны): A OR (B AND C) и (A OR B) AND (A OR C).
Читайте также
ПРОШУ,ПОМОГИТЕ!!!умоляю!БУДЬТЕ ДОБРЫ!!
Например:
Rectangle(50,50,250,150). не могу понять как находят то что в скобках (50,50,250,150).как???скажите те кто знает, очень прошу!
ПРОШУ,ПОМОГИТЕ!!!
Например:
Rectangle(50,50,250,150). не могу понять как находят то что в скобках (50,50,250,150).как???скажите те кто знает, очень прошу!
Напишите пожалуйста блок схему
Очень прошу помогите
Найти сумму первых n натуральных чисел кратных 3.
Вы находитесь на странице вопроса "Паскаль... очень прошу!!! Помогите!!!!", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.