Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal ABC Циклы. Найти среднее арифметическое 5 чисел https://www.cyberforum.ru/ pascalabc/ thread612525.html
Помогите решить пожалуйста! 2.Найти среднее арифметическое 5 чисел( с помощью цикла) ЗАРАНЕЕ БЛАГОДАРНА :D
Дана последовательность an=((-1)^(n-1))/n^2. Найдите номер n, при котором член последовательности an<ε Pascal ABC
Дана последовательность an=((-1)^(n-1))/n^2. Найдите номер n, при котором член последовательности an< ε. {ε = 10-4}
Pascal ABC Найти сумму всех элементов матрицы Найти сумму всех элементов матрицы https://www.cyberforum.ru/ pascalabc/ thread612376.html Pascal ABC Найти наименьший элемент в массиве Найти наименьший элемент в массиве https://www.cyberforum.ru/ pascalabc/ thread612374.html
Составить программу, выводящую на экран студенческую ведомость Pascal ABC
Составить программу, выводящую на экран студенческую ведомость (Ф. И. О., оценки за три экзамена, средний балл).
Pascal ABC Многочлены https://www.cyberforum.ru/ pascalabc/ thread612345.html
Всем добрый вечер. Вот такая задача, даже алгоритм составить не могу, пфф... Последовательность многочленов H0(x;), Н1 (х), ... определяется следующим образом: H0(х)=1, Н1(х) = х, Hk(x) = Hk-1(x) – (k-1) Hk-2(x) (k=2,3,…). а) Получить H3(x), H5 (x), H6(x). б) Даны действительные числа а0,..., a6. Получить многочлен а0H0(x) + … +а6Н6 (х). в) Дано действительное число а. Вычислить H0...
Pascal ABC Файл: Найти слово, встречающееся в каждом предложении, или сообщить, что такого слова нет. Дан файл, содержащий текст на русском языке. Найти слово, встречающееся в каждом предложении, или сообщить, что такого слова нет. https://www.cyberforum.ru/ pascalabc/ thread612334.html Множество: выделить множество чисел, делящихся без остатка на 6 Pascal ABC
Из множества целых чисел 1..20 выделить: множество чисел, делящихся без остатка на 6; множество чисел, делящихся без остатка или на 2, или на 3.
Pascal ABC Массив: найти сумму отрицательных чисел и определить, сколько среди них четных Программа заполняет одномерный массив из 20 вещественных чисел с клавиатуры. Программа находит сумму отрицательных чисел, усекает числа и определяет, сколько среди них четных, сколько чисел по модулю больше 5 https://www.cyberforum.ru/ pascalabc/ thread612332.html Pascal ABC Процедуры и функции: написать подпрограмму, определяющую какой треугольник можно построить. https://www.cyberforum.ru/ pascalabc/ thread612331.html
Для заданных вещественных положительных чисел A, B, C написать подпрограмму, определяющую какой треугольник можно построить.
Pascal ABC Используя модуль, поместите картинку по углам экрана и в центре.
Создайте модуль, в котором будет храниться процедура создания следующей картинки. Используя модуль, поместите картинку по углам экрана и в центре.
Pascal ABC Распечатать списки студентов по группам https://www.cyberforum.ru/ pascalabc/ thread612321.html
Написать программу формулирования ведомости об успеваемости студентов. Каждая запись этой ведомости должна содержать номер группы,фамилию студента, средний балл за последнюю сессию.необходимо распечатать списки студентов по группам. type spisok=record group:string; family:string; bal:byte; end; arr=array of spisok; var zap:arr;i,j,n:byte; Begin...
Robin Bad на форуме
237 / 237 / 194
Регистрация: 14.12.2010
Сообщений: 513
02.04.2011, 21:17 0

Цикл. Ввести с клавиатуры 5 чисел и вывести их кубы - Pascal ABC - Ответ 3201025

02.04.2011, 21:17. Показов 3818. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено Александр@ как решение

Решение

3.
Pascal
1
2
3
4
5
6
7
8
9
10
11
uses crt;
var a,i:integer;k:real;
begin
for i:=1 to 5 do
begin
write('число= ');
readln(a);
k:=exp(3*ln(a));
writeln('его куб ',k);
end;
end.


Вернуться к обсуждению:
Цикл. Ввести с клавиатуры 5 чисел и вывести их кубы Pascal ABC
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
02.04.2011, 21:17
Готовые ответы и решения:

Ввести с клавиатуры N чисел, найти из них наибольшее и вывести его
В книге был приведен пример, но решения там нет, а как вообще должна начинатьсся запись решения...

Ввести с клавиатуры массив А из 15 вещественных чисел. Вывести на экран номер первого отрицательного эл
Ввести с клавиатуры массив А из 15 вещественных чисел. Вывести на экран номер первого...

Ввести с клавиатуры натуральное число A. Вывести на экран сумму всех чисел от 1 до A включительно
Ввести с клавиатуры натуральное число A. Вывести на экран сумму всех чисел от 1 до A включительно....

Ввести с клавиатуры одномерный массив из 5 целых чисел и вывести количество ненулевых элементов
Написать программу, которая вводит с клавиатуры одномерный массив из 5 целых чисел и выводит...

1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.04.2011, 21:17
Помогаю со студенческими работами здесь

Вывести квадраты и кубы чисел от a до b
Ввести a и b с клавиатуры и вывести квадраты и кубы чисел от a до b(нужно использовать цикл)

Вывести на экран кубы чисел от А до В
5. Вывести на экран кубы чисел от А до В.

Ввести с клавиатуры массив из n чисел (n задать const) Вывести на экран нечётные элементы с чётными индексами
Помогите пожалуйста решить задачу. Ввести с клавиатуры массив из n чисел (n задать const) Вывести...

Вывести квадраты и кубы 10 чисел следущей последовательности
вывести квадраты и кубы 10 чисел следущей последовательности: 1, 2, 4, 7, 11, 16 …

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru