Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Паралиллепипед
21.02.2020 21:04 •
Информатика
Описать процедуру powera3(a, b), вычисляющую третью степень числа a и возвращающую ее в переменной b (a — входной, b — выходной параметр; оба параметра являются вещественными). с этой процедуры найти третьи степени пяти данных чисел
Показать ответ
Ответ:
vikakareva1
26.08.2020 13:47
Procedure PowerA3(A: integer; Var B:longint);
Begin
B:=A*A*A;
End;
Var
A,B,C,D,E:longint;
Begin
ReadLn(A,B,C,D,E);
PowerA3(A,A);
PowerA3(B,B);
PowerA3(C,C);
PowerA3(D,D);
PowerA3(E,E);
WriteLn(A,' ',B,' ',C,' ',D,' ',E)
End.
1 2 3 4 5
1 8 27 64 125
0,0
(0 оценок)
Популярные вопросы: Информатика
vaneevartem625
28.11.2022 17:54
Дана длина l окружности. найти ее радиус r и площадь s круга, ограниченного этой окружностью, учитывая, что l = 2*pi*r, s = pi*r2. в качестве значения pi использовать 3.14....
zukhra9087
29.03.2021 12:48
1) дано логическое выражение, зависящее от 6 логических переменных: x1 ¬x2 x3 ¬x4 x5 x6 сколько существует различных наборов значений переменных, при которых выражение...
alenushkabelya
18.10.2021 07:23
Вдвумерном массиве действительных чисел найти произведение нечетных элементов остаток от деления на 3 которых равен 2. (, надо написать на языке паскаль)...
Утешитель
12.01.2021 16:50
Программирование на java , решить в одномерном массиве, состоящим из n вещественных элементов, вычислить: количество элементов массива, меньших с; сумму целых частей элементов...
aidafarhadova
20.10.2022 13:39
В результате работы программы T=15S=-11If SPRINT “S=”; S; “T=”; TEND Что мы получим? S=? T=?...
xXEliteXx
10.11.2022 01:37
Доказать с таблиц истинности: (a⇒b)≡(ā ∨ b)...
sana1998d
24.01.2020 13:49
Составьте словосочетание с данными словами жить далеко, находиться наверху,спуститься вниз, увидеть издали, завернуть налево, идти прямо....
vikkkki1
24.01.2020 13:49
Нужны ответы на вопросы 1)what do some people feel when they are far from home and miss it very much? 2)what do people usually say if it rains heavily? 3)what willoyd the americans...
lisablida
24.01.2020 13:49
5. буква я пишется во всех словах ряда: а) они завис__т, завис__щий он непогоды; б) они дремл__т, догоня__щий; в) они кле__т, смотр__щий вдаль; г) они пол__т, вид__щий в темноте....
vols1
24.01.2020 13:49
Снаписанна так: прочитайте.найдите и исправьте ошибки.дайте характеристику этим звукам.подчеркните имена прилагательные? 1.тащит мышонок в норку,огромную хлебную горку. 2. красавица,своей...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Begin
B:=A*A*A;
End;
Var
A,B,C,D,E:longint;
Begin
ReadLn(A,B,C,D,E);
PowerA3(A,A);
PowerA3(B,B);
PowerA3(C,C);
PowerA3(D,D);
PowerA3(E,E);
WriteLn(A,' ',B,' ',C,' ',D,' ',E)
End.
1 2 3 4 5
1 8 27 64 125