Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
romashchenko17
26.11.2022 18:18 •
Информатика
Напишите в паскаль найти объем куба
Ответ:
kobelevmiklip08h5g
16.07.2020 12:48
Var
a, v : integer;
begin
write('Введите длину ребра:');
readln(a);
v := a * a * a;
writeln;
writeln('Объем = ', v);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
TKluykova
11.09.2020 00:36
Требуется определить, является ли данный год високосным. (Год является високосным, если его номер кратен 4, но не кратен 100, а также если он кратен 400.) Входные данные Вводится...
Hippie111
20.04.2020 08:12
Ввести массив из 7 элементов. подсчитать произведение положительных элементов массива....
alioo
01.08.2021 05:35
Какое количество информации требуется для кодировки одного символа,если мощность алфавита 256 символов....
djuraev488
04.10.2022 12:08
К каким последствиям может привести невыполнение правил включения и выключения компьютера?...
Amina21777
30.03.2020 21:45
Вожно ли знать санитарно гигиенические требования? Какие правила вы можете привести в качестве примера?...
какм1
26.08.2020 11:06
1000kib- сколько это? а)1mib б)1024000байт в)1000000байт г)1 мегабайт...
гпү
04.08.2021 17:36
Какое отношение между понятиями 1)соль - сахар? 2)устройство вывода – принтер 3)город пекин – столица китая 4)первоклассники – девочки...
oksukbaevak
18.06.2022 18:27
Сколько файлов объемом по 8кб каждый успеет передать пользователь за 15 секунд,если за 5 секунд он смог передать 4 таких файла? скорость передачи данных считать неизменной ....
skawin2017
19.09.2022 23:03
Напишите программу которая вычисляет сумму 2 чисел введённых в квадрат...
машунька0811
07.06.2020 20:13
НАДО УМОЛЯЮ ВАС Я НИКОГДА ЭТО НЕ РЕШУ А МНЕ НАДО ПО ИНФЕ ИСПРАВЛЯТЬ АТТЕСТАТ ВСЕ ДЕЛА Массив arr из десяти элементов сформирован командой: for i := 1 to 10 do arr[i] := 2 * i + 10;Чему...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
a, v : integer;
begin
write('Введите длину ребра:');
readln(a);
v := a * a * a;
writeln;
writeln('Объем = ', v);
end.