Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
кира6371929648
10.05.2023 05:23 •
Информатика
Дано вещественное число а и целое число n> 0. вывести все целые степени числа a от 1 до n.
Показать ответ
Ответ:
zhimagulova
10.06.2020 21:08
var n,i:integer;
a,s:real;
Begin
s:=1;
for i:= 1 to n do Begin
s:=s*a;
writeln(s);
end;
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
PоLinaKozloVa
27.04.2023 05:46
Для школьного праздника группа учащихся решила поставить танец, в котором иллюстрировалась бы работа алгоритма сортировки пузырьком. В этом танце учащиеся становятся в одну линию,...
mira132
17.02.2021 19:20
Задана прямая y=ax+b. Для произвольной точки (х,у) определить, как расположена она относительно прямой: а) выше прямой; б) на прямой; в) ниже прямой. Написать на языке ПРОЛОГ...
Faskarvdbdbc
24.08.2020 13:53
Миша заблудился в лесу и пытается выйти. Он составил план маршрута выхода из леса. План состоит из N прямолинейных отрезков пути. Сначала Миша идёт a1 метров на север, потом a2...
padafet2504
17.11.2020 05:51
РАЗЛОЖЕНИЕ НА ПРОСТЫЕ - 2 Задача Требуется разложить целое число N на простые множители, представив его в виде произведения степеней простых множителей и вывести результат в порядке...
Shugyla2017
26.03.2020 22:38
Выяснить преимущества и недостатки модулей памяти трех известных производителей: ■ Kingston; ■ Transcend; ■ GoodRam. Результат оформить в виде таблицы....
jdgdjrs
19.04.2020 18:25
Яке призначення графічних редакторів? а створення бази даних в редагування тексту б опрацювання графічних зображень г розархівування файлів...
CrySony1
08.09.2021 16:03
2sin^2x-sinx/2cosx+корень из 3 = 0 а)решите б)найдите все корни этого уравнения принадлежащие промежутку [pi; 5pi/2]...
aiskfjdUe
08.09.2021 16:03
Как робинзон крузо жил без общества?...
sofiiaskvira
08.09.2021 16:03
Кколе пришли друзья.во что поиграть ? надо подчеркнуть буквы которые обозначают мягкость согласных звуках...
solov1
08.09.2021 16:03
Размер фотографии 4000х 1500 точек.каждая точка имеет столько цветов ,что для её кодирования требуется 2 байта .сколько места займёт данная...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var n,i:integer;
a,s:real;
Begin
s:=1;
for i:= 1 to n do Begin
s:=s*a;
writeln(s);
end;
End.