сервис вопросов и ответовпрограмма на Паскале...
10-11 класс|
|
Нахождение произведения четных чисел и суммы нечетных чисел меньше 15...
Anna86rus
12 мая 2013 г., 17:04:35 (11 лет назад)
Iraaaaaa
12 мая 2013 г., 19:47:23 (11 лет назад)
var s,p:real;
i:integer;
Begin
p:=1;
for i := 1 to 14 do
if i mod 2 = 0 then p:=p*i
else s:=s+i;
writeln(p,s);
End.
Ответить
Другие вопросы из категории
Составить алгоритм, который определяет сумму четных
чисел из трех введенных a,b,c. Если таких нет, то вывести
сообщение об этом. (Можно с объяснением пожалуйста)
Читайте также
Пожалуста!!!!!!!!!!!!!!!!!!!!!!ОЧ срочно!!!!!! Написать программу на паскале, которая вводит
массив из N целых чисел и выводит на экран номера отрицательных элементов и сами эти элементы. Протестировать программу для следующих массивов:
а) 3 5 -2 0 -6 -8 1
б) -1 -2 -3 0 -1 2 3
массивы должны вводися вручную а не рандомно.
написать программу на Assembler
добрый вечер, всем. помогите, пожалуйста, написать программу на Ассемблере.
задание:
Создать программу на языке Ассемблер, что позволяет организовать вычисления над элементами массивов
Объединить два массива 8-битных целых чисел со знаком. Сначала элементы второго затем первого.
заранее огромное спасибо всем!
1.тема циклы со сщетчиком.Написать программу в паскале для ввода с клавиатуры 15 чисел и вывода номеров отрицательных элементов.
2.написать программу в паскале
f(x)=2(sin*sin)x+1
Помогите создать программу на паскаль:
Разработать
программу в соответствии со своим вариантом: создать структуру типа «запись», выполнить
обработку данных.
Написать программу на паскале: Дана матрица А, имеющая N строк и N столбцов.
Сформируйте два одномерных массива. В один перешлите четные, а в другой
-нечетные элементы матрицы. Выведите на экран все массивы.
Вы находитесь на странице вопроса "программа на Паскале...", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.