4cheaT один из старейших форумов рунета. Мы работаем, чтобы вы могли отдыхать с комфортом. Наш форум посвящён онлайн играм, игровым разработкам и модификациям. На нашем онлайн рынке вы можете купить и продать любые онлайн ценности и услуги. Гейминг объединяет криптанов, программистов и вебмастеров!
Разделы форума
Важное
Мы в соц. сетях
- Обратная связь
- Условия и правила
- Политика конфиденциальности
- Помощь
- RSS
На данном сайте используются файлы cookie, чтобы персонализировать контент и сохранить Ваш вход в систему, если Вы зарегистрируетесь.
Продолжая использовать этот сайт, Вы соглашаетесь на использование наших файлов cookie.
Источник: 4cht.com
Функции в паскале. Как возвести число в степень в паскале
Задачи по Pascal. Вывести таблицу степеней двойки
Задачи по Pascal
Автор cyber На чтение 2 мин.
Условие задачи : Вывести таблицу степеней двойки , размер степени вводит пользователь (Язык Pascal).
Сложность : легкая .
До решения задачи стоит сказать как вообще ищется степень какого либо числа , вот формула :
a b = exp(b*(ln(a)))
Для начала создадим каркас нашей задачи.
program stepeni ; uses crt ; var i, size : integer ; step : real ; begin end.
Как вы могли заметить тут всего 3 переменные одна у нас для цикла , еще одна для размера степени , т.е. в какую максимальную степень у нас будет возводиться число и последняя для ответа.
Для начала давайте у пользователя запросим максимальную степень :
write(‘Vvedite max. stepenb : ‘) ; readln(size);
Переменная size будет у нас служить окончанием цикла. Дальше мы и пускаем наш цикл :
for i:=1 to size do begin step := exp(i*(ln(2))); writeln(i:2, step:10:0); end;
Тут всё довольно просто , мы делаем цикл и внутри его , применяя формулу, возводим двойку в степень , которая каждый раз увеличивается на единицу.
Всё решение задачи Pascal :
program stepeni ; uses crt ; var i, size : integer ; step : real ; begin clrscr ; writeln(‘Programma stepenei dvoiki .’); < Для >writeln(‘—————————‘) ; < красоты >write(‘Vvedite max. stepenb : ‘) ; readln(size); for i:=1 to size do begin step := exp(i*(ln(2))); writeln(‘2 v : ‘,i:2, step:10:0); end; readln; end.
Источник: cyberlesson.ru
PASCAL. Урок 3. Арифметические операции. ПАСКАЛЬ
Напишите программу, которая выводит на экран таблицу степеней двойки(от нулевой до десятой) паскаль тт
знай: сила не в богатстве, не в том – велик ли, мал ли чин а в равенстве и братстве!
о сердце не научится любить,которое устало ненавидеть.
той руки удар смертелен, которая ласкала нас.
у счастливого недруги мрут, у несчастного друг умирает.
Ответ разместил: Гость
это не ноутбук не работает это ты скачал или на сайты заходил какиета иза этого у тебя всё зависает очисти ноут проверь если не неси к спциалисту
Ответ разместил: mihksy17
Var
A :array[2..20] of integer;
i : integer;
begin
for i:=1 to 22 do
for i:=1 to 22 do
begin
A[i]:=A[A+2];
Writeln(a[i]:4);
end;
end.
Ответ разместил: КилоЛеденцов
var a:array [0..10] of real;
for i:=0 to 10 do begin
Похожие вопросы:
Информатика, 04.04.2019 10:35
Синфарматикой . 15 . информатика . сделайте 1 2 3 .
Информатика, 18.04.2019 18:54
Начертить в тетради таблицу с планом действий по решению . указать наименьшее количество переливаний. деление 10 л воды поровну, имея сосуды 3, 6 и 7 л. разделить на 2 равные части воду, находящуюся в 6-литровом сосуде (4 л) и в 7-литровом (6 л), пользуясь этими и 3-литровым . какое наименьшее количество переливаний потребуется?
Информатика, 21.04.2019 09:30
1) создать два файла, заполнить их текстом. написать программу, которая сохраняет содержимое этих двух файлов в один, новый файл. 3) написать программу, которая выводит содержимое файла, кроме тех слов длина которых больше 5 символов. str. length()
Источник: otvetovik.com