Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Qweres2000
06.12.2020 10:36 •
Информатика
Составьте программу,которая находит объем параллепипеда(v=a*b*c),a=5,b=10. изменяются от 16 до 3 с шагом -1(a,b-не изменно).решить
Ответ:
Pomogite5pozalystaz
04.10.2020 23:54
ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\";
ПОСТ
A = 5;
B = 10;
ПЕР
C, V: ЦЕЛ;
УКАЗ
C := 16;
ПОКА C >= 3 ВЫП
V := A * B * C;
Вывод.ЧЦел("%d; ", V, 0, 0, 0);
УМЕНЬШИТЬ(C, 1)
КОН;
C := 16;
ПОВТОРЯТЬ
V := A * B * C;
Вывод.ЧЦел("%d; ", V, 0, 0, 0);
УМЕНЬШИТЬ(C, 1)
ДО C < 3;
ОТ C := 16 ДО 3 ПО -1 ВЫП
V := A * B * C;
Вывод.ЧЦел("%d; ", V, 0, 0, 0)
КОН
КОН Задание.
0,0
(0 оценок)
Популярные вопросы: Информатика
vnigmatullina
08.06.2023 09:47
Представьте число 100001001110101 в двоично-десятичном коде....
dabby25
11.09.2022 17:08
Марата необходимо скачать из интернета звуковой файл небольшого размера ему выбрать формат файла. .jpq.pnq. avi.mp4.mp3...
nyarokhno
25.05.2021 15:23
Запишите код программы на языке Python: m=5n²+2/3n-2,5(n+5)...
GeBorgge
20.02.2021 21:58
Какая функция в паскале определяет целое число?...
вика3662
28.09.2022 22:00
Перевести из двоичного системы счисления в десятичную число . подробно...
borovikovaarina
28.09.2022 22:00
Когда в узбекистане был внедрен первый провайдер? а) 1996 б)1997 в) 1992 г) 2000 нужен ответ! не нашел нигде! кто знает...
KatyaCat69
21.08.2022 06:28
Как называется устройство компьютера подобную мыши, но только в перевёрнутом виде?...
katirina61171Rfn
20.05.2021 17:12
Паскаль: в произвольно заданном одномерном массиве определить 4 элемента с наибольшими значения. определить сколько отрицательных значений оказалось среди найденных...
Natalasorochynska
31.05.2021 22:33
С кода в Pascal e нужно вычислить значение выражений: 1)y=15^2+8*x-9; 2)a=(b-c)*d-k Нужен полный код для этих выражений(Только Паскаль)...
jcgddrMarins
08.01.2021 04:12
черно-белое (без градаций серого) растровое графическое изображение имеет размер 40 x 20 точек. какой объем пмити зпнмает это изображение...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\";
ПОСТ
A = 5;
B = 10;
ПЕР
C, V: ЦЕЛ;
УКАЗ
C := 16;
ПОКА C >= 3 ВЫП
V := A * B * C;
Вывод.ЧЦел("%d; ", V, 0, 0, 0);
УМЕНЬШИТЬ(C, 1)
КОН;
C := 16;
ПОВТОРЯТЬ
V := A * B * C;
Вывод.ЧЦел("%d; ", V, 0, 0, 0);
УМЕНЬШИТЬ(C, 1)
ДО C < 3;
ОТ C := 16 ДО 3 ПО -1 ВЫП
V := A * B * C;
Вывод.ЧЦел("%d; ", V, 0, 0, 0)
КОН
КОН Задание.