Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Mаjоr
20.02.2021 06:39 •
Информатика
Влототроне по порядку лежат шары с номерами от 100 до 200. он выбрасывает каждый седьмой. составьте алгоритм на языке паскаль для определения номеров выпавших шаров. обязательно цикл с предусловием.
Ответ:
КириллАлек
03.10.2020 22:59
Var
i:integer;
begin
i:=100;
while (i+7<200) do begin
inc(i,7);
write(i,' ');
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Xamelion11
27.09.2020 23:20
Определите, при каком наименьшем введённом значении переменной s программа выведет число 23. s = int(input()) n = 50 while s 0: s = s // 2 n = n - 3 print(n)...
ladoshkinOff
14.05.2020 19:14
Расположите величины в порядке убывания 4 байта, 20 бит, 80 бит, 8 байт, 212 байт и 214 бит 3) Выразите информационный объем сообщения 221 бит в килобайтах. 4)...
Jand9
15.07.2020 09:57
Написать программу, которая при вводе числа в см выдает количество полных метров. (на языке паскаль)...
akozhametova
25.02.2021 00:46
50б. а: =6 в: =а*3 а: =в-а если в а то с: =в+а иначе с: =а*а все с: =с+1 вывод с=...
elen19871
14.07.2022 11:41
Опишите три правила работы за компьютером чтобы не навредить своему здоровью...
valeriarodriger
02.05.2020 06:47
Акпарат аныктамасын жаз сор...
mustafina1990
03.07.2022 16:12
Выбери из списка вариант кода, который соответствует указанному слову. Слово – LAMP. Пояснение: закодированные буквы в азбуке Морзе отделяются тремя пробелами....
Yaritas
09.12.2022 20:14
Составить лог.вырожене и решить его...
DashaLutova
22.05.2021 09:30
Заполните пропущенные слова и словосочетания в предложениях.Ты можешь использовать слова: компьютер, машина Паскаля, абак, принтер, джойстик, Вот твое предложение:...
АсяБру
11.01.2022 07:42
2.Информационный вес символа 5 бит. Найти мощность этого алфавита 3. Алфавит племени Бибул содержит всего 8 букв. Одна буква этого алфавита несёт объём информации,...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
i:integer;
begin
i:=100;
while (i+7<200) do begin
inc(i,7);
write(i,' ');
end;
end.