Вопрос по информатике:
СРОЧНО!!!сформировать одномерный массив из n элементов следующим образом: элемент с четным номером равен номеру в квадрате, элемент с нечетным номером-корню квадратному из номера
- 20.07.2018 02:31
- Информатика
- remove_red_eye 5951
- thumb_up 10
Ответы и объяснения 2
// PascalABC.NET 3.0, сборка 1088
const
nn=100;
var
a:array[1..nn] of real;
i,n:integer;
begin
Write('Количество элементов в массиве: '); Read(n);
for i:=1 to n do begin
if Odd(i) then a[i]:=sqrt(i)
else a[i]:=sqr(i);
Write(a[i]:0:4,' ')
end;
Writeln
end.
Тестовое решение:
Количество элементов в массиве: 12
1.0000 4.0000 1.7321 16.0000 2.2361 36.0000 2.6458 64.0000 3.0000 100.0000 3.3166 144.0000
- 21.07.2018 16:50
- thumb_up 27
Var A:array[1..100] of real;
i,N:integer;
begin
Readln(N);
For i:=1 to N do
begin
If i mod 2=0 then
A[i]:=sqr(i)
else
A[i]:=sqrt(i);
end;
For i:=1 to N do
Write(A[i],' ');
end.
- 22.07.2018 07:10
- thumb_up 12
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.