Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
юсуф37
22.07.2022 06:07 •
Информатика
1)составьте программу для вычисления y=x, если x положительное число . 2)составьте программу для вычисления объема куба со сторонами от 5 до 20
Показать ответ
Ответ:
fggyhuhgyg
05.10.2020 16:01
Var
X:real;
Begin
Write('X = ');ReadLn(X);
if X>0 then Write('Y = ',X)
End.
Var
a:integer;
Begin
For a:= 5 to 20 do
WriteLn('V(',a,') = ',a*a*a)
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
Sasha11111222
27.01.2021 16:46
If15. даны три числа. найти сумму двух наибольших из них.( сделать блок схему пож)...
Dasha142nikolaeva
28.07.2021 04:17
1. Чем отличается компьютер от ЭВМ? 2.Перечислите ПО общего назначения 3.Перечислите ПО специального назначения 4.Перечислите Профессиональное ПО 5. Классы языков...
babykitten5002p08hdk
03.07.2020 22:57
Сфункций mod, div, сформировать число, представляющее собой реверсную (обратную в порядке следования разрядов) запись заданного четырёхразрядного числа. например,...
baten
25.01.2023 16:40
Нужен простенький код для сайта на html с 4 страницами ...
aIinakormiIkina
10.03.2021 01:15
Закрасить пустые ячейки с алгоритма ветвление кумир стандарт...
bandygan666
27.06.2022 19:29
Найти в сети интернет или придумать свою интересную на переправу. оформить на одном листе текстового документа описание с рисунками, а на другом таблицу с решением....
tana29143Танечка
16.09.2020 03:34
Решить по информатике, в паскале ...
лямда1234
18.11.2020 20:33
На бесконечное поле, расчерченное в клетку, капнули субстанцией с микроорганизмом, кото- рый на каждом ходу поглощает клетки, соседние по стороне с уже поглощенными....
sonsan108
09.08.2022 05:54
Составьте схемы предложения, объясните постановку знаков препинания. 1.В дверь несмело постучали, и в комнату вошла невысокая девушка. 2.Объявили тревогу, и через...
natashalife
05.10.2021 19:39
Верных ответов: 2 AB = 9 см AB = 12 см AC = 6 см AC = 18 см...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
X:real;
Begin
Write('X = ');ReadLn(X);
if X>0 then Write('Y = ',X)
End.
Var
a:integer;
Begin
For a:= 5 to 20 do
WriteLn('V(',a,') = ',a*a*a)
End.