Сформируйте массив, содержащий n элементов

@Paul Oakenfold · Регистрация: 10.04.2009

Author24 — интернет-сервис помощи студентам

1. Сформируйте и выведите на экран миссв из n элементов, где каждый элемент массива равен произведению двух предыдущих и его порядкого номера.

2. Сформируйте массив, содержащий n элементов, с помощью чисел, введенных с клавиатуры. Получите новый массив, каждый элемент которого равен удвоенному числу соответствующего элемента исходного массива, если он больше числа A. введенного с клавиатуры, и не изменяется в обратном случае. Выведите на экран исходные и полученные результаты.

@yanyk1n · 16.04.2009, 10:40

№1:

Pascal

program mm;
uses crt;
var m:array[1..100]of longint;
     i,n:integer;
 
begin
 clrscr;
 write('Размерность: ');
 readln(n);
 write('Первый и второй элемент массива: ');
 readln(m[1],m[2]);
 for i:=3 to n do m[i]:=m[i-1]*m[i-2]*i;
 
 for i:=1 to n do write(m[i],' ');
 readln;
end;

Добавлено через 13 минут 32 секунды
№2:

Pascal

program mm;
uses crt;
var m1,m2:array[1..100]of longint;
     i,n,a:integer;
 
begin
 clrscr;
 write('Размерность: ');
 readln(n);
 write('Число A: ');
 readln(a);
 writeln('Массив:');
 for i:=1 to n do read(m1[i]);
 readln;
 for i:=1 to n do
 begin
  if m1[i]>a then m2[i]:=2*m1[i] else m2[i]:=m1[i];
  write(m2[i],' ');
 end;
 readln;
end.

@Paul Oakenfold 0 / 0 / 0 Регистрация: 10.04.2009 Сообщений: 35
		1
	Сформируйте массив, содержащий n элементов 16.04.2009, 10:11. Показов 1642. Ответов 1 Метки нет (Все метки) 1. Сформируйте и выведите на экран миссв из n элементов, где каждый элемент массива равен произведению двух предыдущих и его порядкого номера. 2. Сформируйте массив, содержащий n элементов, с помощью чисел, введенных с клавиатуры. Получите новый массив, каждый элемент которого равен удвоенному числу соответствующего элемента исходного массива, если он больше числа A. введенного с клавиатуры, и не изменяется в обратном случае. Выведите на экран исходные и полученные результаты. 0

	16.04.2009, 10:40

Сформируйте массив, содержащий n элементов

Решение