logo
Войти Регистрация Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
RRRR2221111
RRRR2221111
13.07.2022 09:46 •  Информатика

Программисты, нужно написать программу на паскале. дано натуральное число n. возвести в степень n число 2. с longint и integer.

Показать ответ
Ответ:
Pincode11
Pincode11
08.10.2020 17:15
Var
  n, i: longint;
  a: int64;

begin
  readln(n);
  a := 2;
  for i := 2 to n do
    a := a * 2;
  writeln(a);
end.
0,0(0 оценок)
Ответ:
Igor171717
Igor171717
08.10.2020 17:15
Program z1;
var a,n:longint;
c:real;
begin
writeln('Введите N=');
read(n);
a:=2;
c:=power (a,n);
writeln(c);
end.
0,0(0 оценок)
Популярные вопросы: Информатика
ЮляЯяя1111
ЮляЯяя1111
29.01.2022 14:17
Вычислить 1/1^2+1/2^2+1/3^21/100^2 c++При...
Piragovicch
Piragovicch
12.02.2021 00:10
10001+11110 ( в двоичной системе счисления)​...
1337luntik2282
1337luntik2282
04.01.2020 15:55
Розв’язати завдання (надіслати фото або скріншот коду, компілятор на ваш вибір (мова програмування Python)). найдите корень квадратного уравнения и вывести их на экран...
sane08one
sane08one
29.12.2021 22:51
Объясните что за что отвечает в этом коде, а то ничего не понятно :( Uses graphABC,ABCObjects; var i,xhead,yhead,z,appleX,appleY:integer; head:CircleABC; snake:array[1..4]...
Лизик2007
Лизик2007
05.02.2020 00:01
PYthon поиогите сделать рожалуйста задачу Напишіть функцію, яка отримує рядок і ціле число n та повертає n копій заданого рядка....
cbnybrjds
cbnybrjds
15.07.2020 16:02
Выбери точку 480, 115, 555, 160, 220 в котором может допрыгнуть исполнитель кузнечик из начального положения в точке 0, если он умеет выполнять только команды: вперед...
mahinaboboeva
mahinaboboeva
15.07.2020 16:02
Придумать жизненную ситуацию, когда можно выразиться крылатым выражение авгиевы конюшни ?...
bisenkoda
bisenkoda
21.11.2022 19:02
Установи закономрiнiсть,упиши числа яких не вистачае : 7,3,1,2,4,2,3 ; 2,7,5,3,4,11; 15,3,5,6,4; 8,5,4,7...
777sofia777
777sofia777
21.11.2021 18:03
Разработать проект, запрашивающий дату рождения пользователя и рассчитывающий его возраст в Visual Basic 2017...
ПолинаТ1
ПолинаТ1
29.05.2020 21:51
Сколько оттенков цветов может быть в операционной системе?​...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота