tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Написать цикл с предусловием.
Написать цикл с предусловием. вычислить а в степени n.
Alexa20
2 04.06.2019 22:50
1
Ответы
ммаа2
05.07.2020 17:25
var
b: byte;
a: integer;
c: longint := 1;
begin
readln(a, b);
repeat
c *= a;
b -= 1;
until b = 0;
writeln(c);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
nasyatkachenko8
27.09.2019 00:31
Решить информатику! 80 ! программирование! ...
trol77
27.09.2019 00:32
Вопросы по cisco packet tracer1)для решения каких используется динамическая маршрутизация? какие протоколы дин. мар. испол на устройствах cisco? с каких команд настраивается?...
Amana95
21.06.2019 12:10
Впишите название инструментов рисования фигур графичного редактора paint...
Аайй
06.06.2019 22:20
Какие решить , составить программы: 1.найти сумму цифр целого четырехзначного числа, и определить число, цифры которого записаны в обратном порядку по отношению к...
Five11
06.06.2019 22:20
Найти частное произведений четных и не четных цифр четырехзначного числа n...
damnit
02.08.2019 17:00
Профессии которой гравной деятельности являеться работа с информацией...
Maks23241
02.08.2019 17:00
Почему на уроке информатике всегда такие слабые они постоянно глючат и лагают я вообще не понимаю зачем тогда они нужны ? )...
kati1200777
09.11.2021 11:06
Графический - это описания алгоритмов:...
ygorbrusnyak
09.11.2021 11:45
Как правильно оформить формулу в экселе ? =exp(cos(0,3*c6))+0.2*sin^2(c6) выдаёт ошибку...
mashoklomakina
26.05.2019 23:10
1. найдите значение произведения. 3/4*5/7= 7/9*3/7= 2*3/5= 5/8*1 1/15= 2 1/10 * 1 1/14= 2.найдите значение выражения. 5-1 1/9 * 2 2/5= 3. найди 3/4 от 36 = 4. на ферму...
Популярные вопросы
Какие природные сообщества есть на урале?...
2
Найдите значение числового выражения а) (7/20 + 3/10) - ( 1/8 +...
1
18 шоколадок разложили поровну на тарелки по 6 штук. сколько тарелок...
2
Вкомнате летало несколько комаров.когда в комнату влетело ещё 3...
3
С! thurn the sentences below into the ! 1. somebody hit me. 2....
2
Как решить уравнение? 3×(x-2)=10-x...
2
Найдите длину трёх пролётного моста, если длина среднего пролёта...
2
Синтаксический разбор и грамматическую основу главные и второстепенные...
3
Вчем выражается большая антропогенная нагрузка на ландшафты равнины?...
2
Во время ремонта за укладку кафельной плитки было уплачено 255...
2
b: byte;
a: integer;
c: longint := 1;
begin
readln(a, b);
repeat
c *= a;
b -= 1;
until b = 0;
writeln(c);
end.