сервис вопросов и ответов1 Задание:сформируйте и выведите на экран массив из девяти элементов,каждые три последовательных элемента которого составлены по следующему правилу:
5-9 класс|
|
1-й равен значению текущего индекса, увеличенному на 3; 2-й равен квадрату предыдущего индекса; 3-й равен сумме двух предыдущих элементов. 2 Задание : сформируйте массив, содержащий 15 элементов ,с помощью датчику случайных чисел. Получите новый массив,каждый элемент которого равен сумме соответствующего элемента исходного массива и его индекса. В полученном массиве удвойте элементы,которые меньше заданного с клавиатуры числа А,и найдите их сумму . Выведите на экран исходные и полученные результаты .
J131209
22 мая 2013 г., 11:24:15 (10 лет назад)
Reyмиx
22 мая 2013 г., 12:52:24 (10 лет назад)
uses crt;
var
a:array [1..9] of integer;
i,c,m,n:integer;
b:real;
begin
clrscr;
randomize();
c:=1;
for i:=1 to 9 do
begin
if i=c then
begin
a[i]:=i+3;
c:=c+3;
end
else
begin
if i mod 3=0 then a[i]:=a[i-1]+a[i-2] else a[i]:=sqr(i-1);
end;
write(a[i],' ');
end;
readln();
end.
uses crt;
var x,y,s,i,j:integer;
a: array [1..15] of integer;
begin
clrscr;
randomize();
writeln('Vvedite chislo');
readln(x);
writeln('Ishodniy');
for i:=1 to 15 do
begin
a[i]:=random(100);
write(a[i],' ');
end;
writeln;
writeln;
writeln('Ispravlenniy');
for i:=1 to 15 do
begin
if a[i]+i<x then
begin
a[i]:=(a[i]+i)*2;
s:=s+a[i];
textcolor(red);
write(a[i],' ');
end else
begin
textcolor(white);
a[i]:=(a[i]+i);
write(a[i],' ')
end;
end;
writeln;
textcolor(green);
writeln('Summa =',s);
readln;
end.
Ответить
Другие вопросы из категории
помогите написать программу
вывести на экран последовательность 1/1,1/3,1/5,1/7,..(9 элементов)
Читайте также
1. Сформируйте и выведите на экран массив из девяти элементов, каждые три последовательных элемента которого составлены по следующему правилу:
1-й равен случайному трехзначному числу;
2-й равен текущему индексу, увеличенному в 10 раз;
3-й равен сумме двух предыдущих элементов.
(программу надо выполнить в Паскале)
сформулируйте и выведите на экран массив из девяти элементов, каждые три последовательных элемента которого составлен по следующему правилу: первый
равен 500; второй равен целой части квадратного корня из предыдущего элемента; третий равен целой части от деления текущего индекса на три части (если она равна нулю,то соответствующий элемент массива делать равным 1)
Пожалуйста,помогите мне с информатикой.Это задание решает,что у меня будет в аттестате.Все 4 и 5,а по инф. может выйти 3.Помогите решить,пожалуйста:
Сформулируйте и выведите на экран массив из девяти элементов,каждые три составлены по следующему правилу:1й равен трехзначному числу;2й равен текущему индексу,увеличенному в 10раз;3й равен сумме двух предыдущих элементов.
Блин,учительница сказала еще решить одну карточку,чтобы она поставила 4 в году.Помогите пожалуйста решить вот первые номер:Сформируйте и выведите
на экран массив из девяти элементов,каждые три последовательных элементов которого составлены по следующему правилу:1й равен квадрату текущего индекса,увеличенному на 5,2й равен целой части квадратного корня из предыдущего элемент,3й равен целой части от деления двух предыдущих элементов.
Сформируйте массив bc размерностью30 элементов случайным образом из диапазона 0 – 50.сформированный массив выведите на экран в строку. Подсчитайте
сумму всех четных элементов массива и отдельно сумму элементов имеющих четные индексы. Выведите результаты подсчета на экран. Отсортируйте данный массив по убыванию.
Вы находитесь на странице вопроса "1 Задание:сформируйте и выведите на экран массив из девяти элементов,каждые три последовательных элемента которого составлены по следующему правилу:", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.