Вопрос по информатике:
1)Заполнить массив размером N целыми числами последовательно от 1 до N. Вывести его на экран. Найти сумму элементов массива и вывести ее на экран.
2)Заполнить массив размером N целыми числами последовательно от N до 1. Вывести его на экран. Найти количество элементов массива, делящихся на 3 без остатка.
3)Заполнить массив размером N квадратами целых чисел последовательно от 12 до N2. Вывести его на экран. Найти среднее арифметическое элементов массива и вывести его на экран.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 01.06.2017 22:51
- Информатика
- remove_red_eye 10847
- thumb_up 9
Ответы и объяснения 1
Program gt;
var a:array[1..1000]of integer;
i,n,s:integer;
begin
read(n);
for i:=1 to n do
begin
a[i]:=i;
write(a[i],' ');
end;
writeln;
s:=((1+n)*n)div 2;
writeln(s);
end.
2)
program gt;
var a:array[1..1000]of integer;
i,n,s:integer;
begin
read(n);
s:=0;
for i:=n downto 1 do
begin
a[i]:=i;
write(a[i],' ');
if(i mod 3=0)then s:=s+1;
end;
writeln;
writeln(s);
end.
3)
непонятно условие
там что за n2?
- 02.06.2017 10:46
- thumb_up 33
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.