М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
kseniaflrsova72
kseniaflrsova72
05.01.2020 18:58 •  Информатика

1)Найти произведение 10 элементов массива,заполненного случайными числами.
2)Вывести сумму тех элементов массива ,значения которых меньше 10(массив состоит из 15 элементов ,заполнен случайными числами

👇
Открыть все ответы
Ответ:

Вот

Объяснение:

                                                 начало

                                                       |

                                         подойди к дороге

                                                       |

                                      посмотри на светофор

                                                        |

                                          цвет зелёный?

                                             |                    |

                                       если да          если нет

                                             |                     |

                                           иди               стой

                                              \                     /

                                             конец алгоритма

Запиши в виде этой схемы

4,6(89 оценок)
Ответ:
Yanika159
Yanika159
05.01.2020

program z1;

uses drawman;

begin

Field(19,4);

OnVector(1,3);

PenDown;

OnVector(1,0);

OnVector(0,-1);

OnVector(-1,-1);

OnVector(1,0);

PenUp;

OnVector(1,2);

PenDown;

OnVector(1,0);

OnVector(-1,-1);

OnVector(0,-1);

PenUp;

OnVector(3,2);

PenDown;

OnVector(1,0);

OnVector(0,-2);

OnVector(-1,0);

OnVector(0,2);

PenUp;

OnVector(2,0);

PenDown;

OnVector(1,0);

OnVector(0,-2);

OnVector(-1,0);

OnVector(0,2);

OnVector(0,-1);

OnVector(1,0);

PenUp;

OnVector(2,1);

PenDown;

OnVector(1,0);

OnVector(0,-1);

OnVector(-1,-1);

OnVector(1,0);

PenUp;

OnVector(1,2);

PenDown;

OnVector(1,0);

OnVector(0,-2);

OnVector(-1,0);

OnVector(0,2);

PenUp;

OnVector(2,0);

PenDown;

OnVector(1,0);

OnVector(0,-2);

OnVector(-1,0);

OnVector(0,2);

PenUp;

OnVector(2,0);

PenDown;

OnVector(1,0);

OnVector(0,-2);

OnVector(-1,0);

OnVector(0,2);

OnVector(0,-1);

OnVector(1,0);

PenUp;

OnVector(-18,-2);

end.

Объяснение:

Смотри картинку


Можете в программе PascalABC нарисовать дату 27.08.2008 с команды
4,4(72 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ