Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
ArseniyZnanija
19.05.2021 08:50 •
Информатика
Сожмите массив выбросив каждый 3 его элемент.выведите на экран исходный и измененный результат
Показать ответ
Ответ:
Анастасия5451
05.10.2020 15:52
//PascalABC.Net 3.2
begin
var a:=ReadArrInteger('Вводите массив: ', readinteger('Кол-во элементов: '));
a.Println;
for var i:=0 to length(a)-1 do if (i+1) mod 3<>0 then print(a[i]);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
5ксюША88881
22.03.2021 02:19
Приведите различные примеры процессов обработки информации. Определите, по каким правилам она производится в каждом примере....
vasilchukanna1
30.03.2022 08:17
5. Наведіть приклади інформаційних процесів зі свого по-всякденного життя очень надо...
BlackWolf05
24.03.2020 14:35
• Как вы храните информацию, полученную из окружающей среды или при общении с другими людьми? • Какие органы человека задействованы для хранения этой информации? • Какие...
danilarostov2
25.07.2021 19:29
Костюм ауыстыру деген не?...
Lena2345671
30.03.2020 16:36
1. Как представлено число 14110 в двоичной, восьмеричной и шестнадцатеричной системах счисления?...
svetar2014
16.08.2020 07:00
выполни перевод чисел из двоичной системы в десятичную и обратно: а)10111101^2 б)1110000^2 в)6317^10...
ApTeM098
12.07.2020 17:38
1111001-110110101,1*1110101010:101 по информатике...
Seks7383
11.03.2021 20:32
Компьютер жады ___ монитор??? ...
DashaLOVE04
06.12.2022 02:22
Составить программу,которая вычисляет 3 степень числа,если это число больше 10,но меньше 20...
Polina300696
09.11.2021 01:32
Выберите истинные высказывания: 1.При имитационном моделировании проводятся опыты с компьютерными моделями2.При имитационном моделировании проводятся натурные испытания...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
var a:=ReadArrInteger('Вводите массив: ', readinteger('Кол-во элементов: '));
a.Println;
for var i:=0 to length(a)-1 do if (i+1) mod 3<>0 then print(a[i]);
end.