Нарисовать данный узор в PascalABC?

Информатика | 10 - 11 классы

Нарисовать данный узор в PascalABC.

Ответить на вопрос

Для ответа на вопрос необходимо пройти авторизацию или регистрацию.

Ответы (1)

Ангеляшко 9 февр. 2020 г., 06:07:25

Что вот такое (один уголок неточно попал)

uses GraphABC ;

begin SetWindowSize(640, 480) ; SetPenColor(clRed) ; SetPenWidth(3) ; Line(100, 100, 330, 380) ; Line(170, 40, 400, 310) ; Line(100, 300, 350, 90) ; Line(150, 370, 400, 160) ; SetPenColor(clYellow) ; MoveTo(220, 220) ; LineTo(255, 265) ; LineTo(305, 225) ; LineTo(270, 180) ; LineTo(220, 220)

end.

Vavilova1952 19 июл. 2020 г., 02:55:47 | 5 - 9 классы

Решите задачу на PascalABC?

Решите задачу на PascalABC.

Шум4 12 мар. 2020 г., 08:05:30 | 5 - 9 классы

Дан рост трех друзей?

Дан рост трех друзей.

Как написать программу которая определяет их среднийрост на языке PascalABC?

Sashokgorshkov 13 окт. 2020 г., 04:26:03 | 5 - 9 классы

Как писать в начале pascalABC?

Как писать в начале pascalABC.

Net.

Fatkuller 25 нояб. 2020 г., 18:58:24 | 1 - 4 классы

Заполните пропуски, чтобы нарисовать данную фигуру?

Заполните пропуски, чтобы нарисовать данную фигуру.

Zdes16 22 авг. 2020 г., 06:00:05 | 5 - 9 классы

Помогите выполнить на PascalABC(паскале)?

Помогите выполнить на PascalABC(паскале).

Filimonova2016 16 дек. 2020 г., 15:45:30 | 1 - 4 классы

Решите в pascalABC 1 вариант?

Решите в pascalABC 1 вариант.

Kadrokuza 7 сент. 2020 г., 16:00:09 | 1 - 4 классы

Придумать узор из символов ( узоры : #@ * §$£?

Придумать узор из символов ( узоры : #@ * §$£.

Nerisa2002 17 дек. 2020 г., 11:03:19 | 10 - 11 классы

PascalABC ?

PascalABC .

Дан периметр равностороннего треугольника P.

Найти его сторону a площадь S.

Poli12334 20 дек. 2020 г., 19:51:39 | 5 - 9 классы

Задача "for" pascalABC?

Задача "for" pascalABC.

Net

Даны целые числа K и N (N>0).

Вывести N раз число K.

Lenamalygina29 26 дек. 2020 г., 13:46:18 | 5 - 9 классы

PascalAbc нарисовать шахматное поле, подскажите какие нужны команды?

PascalAbc нарисовать шахматное поле, подскажите какие нужны команды.

На этой странице находится вопрос Нарисовать данный узор в PascalABC?. Здесь же – ответы на него, и похожие вопросы в категории Информатика, которые можно найти с помощью простой в использовании поисковой системы. Уровень сложности вопроса соответствует уровню подготовки учащихся 10 - 11 классов. В комментариях, оставленных ниже, ознакомьтесь с вариантами ответов посетителей страницы. С ними можно обсудить тему вопроса в режиме on-line. Если ни один из предложенных ответов не устраивает, сформулируйте новый вопрос в поисковой строке, расположенной вверху, и нажмите кнопку.

Последние ответы

АлексейкКоп 18 мая 2024 г., 13:14:34

START | V IF (condition is No) THEN | V + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + | &nbsp ; &nbsp ; &nbsp ; &nbsp ; &nbsp ; &nbsp ; &nbsp ; &nbsp ; &nbsp ; &nbsp ; &nbsp ; &nbsp ; &nbsp ; &nbsp ; &nbsp ; &nbsp ; &nbsp ; &nbsp ; ..

4. Складіть блок схему фрагмента алгоритму, у якому цикл з лічильником вкладено в повне розгалуження

Димосс 18 мая 2024 г., 12:10:35

Balance = int(input("Счет - ")) percent = int(input("% - ")) years = 0 print(balance) while balance &lt ; 50000 : years + = 1 balance = balance + balance * percent / 100 &nbsp ; print(years)...

Помогите пожалуйста написать программу на pythonтелевизор стоит 50000 руб?

Albr161080 18 мая 2024 г., 10:59:31

Ответ : вот тебе ответ 2 картинка это первое пиши а 1 картинка вторым пиши...

3. Заполнить массива случайными числами, отобрать в массив bвсе числа, меньшие пяти?

Вунст 18 мая 2024 г., 09:23:15

Відповідь : Для виведення рядка "Hello, World! " в Python використовується функція print print("Hello, World! ")...

Как ввести Hello World в пайтоне?

Jevelaanna 18 мая 2024 г., 08:22:21

Ответ : z : = (82 + 546) / (66 + 24) ;..

Помогите пожалуйста очень срочно?

SkixXx 18 мая 2024 г., 08:09:21

Ответ : 1 - Г 2 - В 3 - А 4 - Б...

Установить відповідність між інструментами форматування?

Kangelina 18 мая 2024 г., 08:09:15

Ответ : 1г 2в 3а 4б вот такой Объяснение : ответ...

Vsadakiev54 18 мая 2024 г., 04:51:58

Program izi ; var n, a, k, i : integer ; begin &nbsp ; k : = 0 ; &nbsp ; readln(n) ; &nbsp ; for i : = 1 to n do begin &nbsp ; readln(a) ; &nbsp ; if (a mod 7 = 0) and (a mod 5&lt ; &gt ; 0) then inc(k) ; &nbsp ; end ; &nbsp ; writeln(k) ; &nbsp ; en..

Ребят, помогите пожалуйста по информатике задачу(13) Нужно составить программу в Паскале ABC?

Person09 18 мая 2024 г., 04:51:51

/ / PascalABC. NET 3. 3 begin &nbsp ; var n : = ReadInteger ; &nbsp ; var a : = ReadSeqInteger(n) ; &nbsp ; print(a. Where(x - &gt ; (x mod 7 = 0)and(x mod 5&lt ; &gt ; 0)). Count) ; end. Пример : 4 6 28 36 21 2&nbsp ;..

Mirapi 18 мая 2024 г., 04:22:45

Ответ : 6 Объяснение : N = 2 ^ i...

Маша использует двоичный код для кодирования сообщения?