сервис вопросов и ответовЭто паскаль! Плиз срочно нужно! 1)Найдите сумму натуральных нечетных чисел не превышающих n!!!! 2)Вычислите произведение натуральных
10-11 класс|
|
чисел кратных трем и не превышающих n!!! 3)Выведите на экран в трех столбцах список чисел от 1 до N, их квадратов и кубов.Число N вводите с клавиатуры!
AnastasijaAA83
12 марта 2017 г., 16:12:38 (7 лет назад)
Vipkatya1
12 марта 2017 г., 16:43:57 (7 лет назад)
//первая программа
var
n, i, s:integer;
begin
write('n = ');
readln(n);
S:=0;
i := 1;
while i <= n do
begin
s := s + i;
i := i + 2;
end;
writeln('Summ = ',S);
end.
//вторая программа
var
n, i, s:integer;
begin
write('n = ');
readln(n);
S:=0;
i := 3;
while i <= n do
begin
s := s + i;
i := i + 3;
end;
writeln('Summ = ',S);
end.
//третья программа
var
n, i, s:integer;
begin
write('n = ');
readln(n);
for i := 1 to n do
writeln(i:10, i * i :10, i * i * i:10);
end.
Ответить
Другие вопросы из категории
150 пунктов за два задания в Basic
1.Составьте функцию, проверяющую упорядоченность всех элементов одномерного массива целых чисел по убыванию их значений. Используя эту функцию, выведите каждый из двух заданных одномерных массивов А и В, если его элементы не упорядочены в порядке убывания их значений. В противном случае выведите сообщение "Массив А ( или В) упорядочен".
2. Составьте функцию проверяющую, что все элементы одномерного массива имеют значения, больше заданной величины. Используя эту функцию, определите для двух заданных одномерных массивов А и В, у скольких из них значение всех элементов больше заданной величины h
При помощи, какой кнопки осуществляется переход
между полями формы? Почему переход к полю даты не осуществляется при нажатии
этой кнопки?
Составьте диалог пользователя с компьютером на произвольную тему. Например, машина задает два вопроса “Как тебя зовут?” и “Сколько тебе лет?”; после
введения имени (Антон) и числа (15) выводит на экран “Да... Через 50 лет тебе уже будет 65 лет, а звать тебя будут не Антон, а дед Антон”
Читайте также
1)Найдите сумму натуральных нечетных чисел не превышающих n!!!!Это нужно сделать циклом for. 2) Составьте программу,которая производит
суммирование произвольного количества целых чисел вводимых с клавиатуры.Концом последовательности служит ввод отрицательного числа.Программу составьте двумя способами: использую цикл с предусловием и цикл с постусловием
Напишите программу, которая в последовательности целых чисел определяет их количество и подсчитывает сумму положительных чётных чисел, не превосходящих
256. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 — признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30 000. Программа должна вывести два числа: длину последовательности и сумму положительных чётных чисел, не превосходящих 256.
Решить задачи • Найдите сумму цифр числа; • Найдите первую цифру числа; • Поменяйте порядок цифр числа на обратный; • Найдите количество четных цифр
числа; • Найдите наибольшую цифру числа; • Найдите сумму цифр числа, больших 5.
Вы находитесь на странице вопроса "Это паскаль! Плиз срочно нужно! 1)Найдите сумму натуральных нечетных чисел не превышающих n!!!! 2)Вычислите произведение натуральных", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.