Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
мари13121
14.01.2021 18:02 •
Информатика
Дано вещественное число а и целое число n> 0. вывести все целые степени числа a от 1 до n.
Ответ:
123451526
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 оценок)
Популярные вопросы: Информатика
thiiagooBR
05.04.2023 14:38
1001101(2) перевести в десятичную систему...
Neznakomka111111
01.04.2023 08:10
Информатика Какой минимальный объём памяти (в Кбайт) нужно зарезервировать, чтобы можно было сохранить любое растровое изображение размером 1024x1024 пикселов при условии,...
ninikogordu
26.08.2020 11:20
Які параметри має властивість Font? а) Style б) Size в) Width г) Color...
elizovetadobinda
22.01.2023 23:11
Дана группа объектов: принтер, монитор, клавиатура. Наиболее точное общее имя для этой группы объектов … устройства вывода устройства ввода устройства ввода/вывода...
ипоопан
17.01.2023 12:50
, не понял тему, не могу решить д/з1)29₁₆ x₁₀ 2)11011101111₂ x₁₀ 3)7654₈ ₁₀ 4)555₁₀ x₈ 5)666₁₀ x₁₆...
Any0070
31.10.2021 14:10
У меня старая клавиатура (лет 5-8) будет ли на ней подсветка.Зарание спс...
logpol40
25.01.2022 16:32
Решите задание по информатике, как нибудь оригинально Составить программу на Паскале для обработки двумерного массива размерностью 3*4. Массив заполнить самостоятельно....
Margaritka1307
20.06.2021 12:37
Напишите программу, которая вводит с клавиатуры натуральное число N и выводит на экран N случайных целых чисел (Python)...
whoihoto
05.05.2023 11:09
Решите это задание как нибудь оригинально, самостоятельно. Очень Составить программу на Паскале, которая удалит все пробелы из текста. Текст: «Информатика − наука, изучающая...
12345678910АБ2261784
25.09.2020 04:28
написать программу на языке Pascal, соблюдая всеусловия...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var n,i:integer;
a,s:real;
Begin
s:=1;
for i:= 1 to n do Begin
s:=s*a;
writeln(s);
end;
End.