помогите пожалуйста нужна программа на паскале с циклом параметра(for)
10-11 класс
|
program z;
var n,s,s1,i:integer;
begin s:=1; s1:=1; s1:=1;
write('n='); read(n);
for i:=1 to n do
begin
if i mod 2 =0 then s:=i*s;
if i mod 2 <> 0 then s1:=i*s1;
end;
write('произведение четных = ',s, ' произведение нечетных = ',s1);
end.
var n,f,i:integer;
begin
readln (n);
f:=1;
for i:=1 to n do
if ((n mod 2 = 1) and (i mod 2 = 1)) or
((n mod 2 = 0) and (i mod 2 = 0)) then f:=f*i;
writeln (f);
end.
Другие вопросы из категории
работникам 15%. Если выручка 0 руб, то премия не начисляется.
#include <iostream>
#include <cstdlib>
using namespace std;
int main() {
int n;
float sum=0;
cout<<"Vvedite n: ";
cin>>n;
float a[n+1], b[n+1];
for (int i=1; i<=n; i++){
system("cls");
cout<<"Vvedite "<<i<<"-e chislo massiva a: ";
cin>>a[i];
sum+=a[i];
b[i]= sum/i;
}
system("cls");
cout<<"B = [";
for (int i=1; i<n; i++){
cout<<b[i]<<", ";
}
cout<<b[n]<<"] ";
system("pause");
return 0;
}
Читайте также
доброй ночи, уважаемые программисты и успевающие в учебе студенты. помогите, пожалуйста, написать программу на C++ (в визуальной вкладке).
ВОТ ЗАДАНИЕ:
дано три переменные вещественного типа. если их значения упорядочены по возрастанию или убыванию, то удвоить их; иначе заменить значение каждой переменной на противоположное. вывести значения переменных.
я прикрепила несколько тестовых файлов (блокнот) в которых есть несколько вариантов решение этого задание (то есть коды программ), а вы скажите какой из них лучше всего подходит, а также скажите какие компоненты нужно кинуть на форму-дизайн (то есть какие кнопки, и что на них писать). в этих 3 файлов есть написанный код программы, нужно написать: на какие кнопки что писать и какой вариант решение больше подходит.
заранее огромное спасибо всем за помощь!!!
добрый вечер, всем. помогите, пожалуйста, написать программу на Ассемблере.
задание:
Создать программу на языке Ассемблер, что позволяет организовать вычисления над элементами массивов
Объединить два массива 8-битных целых чисел со знаком. Сначала элементы второго затем первого.
заранее огромное спасибо всем!
1. Напишите программу формирования и вывода массива размером 6x3, каждые три последовательных элемента в строке которого составлены по следующему правилу:
1-й — равен случайному числу;
2-й — равен целой части квадратного корня из предыду щего элемента;
3-й-равен сумме двух предыдущих элементов.
при умножении на 3 - на 4."
минимальным элементами массива (включая их)