mgrunova
?>

Составьте программу которая заполняет массив a[1..8] случайными целыми числами диапазоне от 1 до 10 и выводит на экран количество элементов с четными значениями и сумму элементов массива с нечетными значениями

Информатика

Ответы

Nikishina
// PascalABC.NET 3.2, сборка 1353 от 27.11.2016
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(9,1,10); a.Println;
  Writeln('Сумма четных ',a.Where(x->x.IsEven).Sum);
  Writeln('Количество нечетных ',a.Where(x->x.IsOdd).Count)
end.

Пример
9 1 4 2 3 10 10 8 3
Сумма четных 34
Количество нечетных 4
zhunina71807
9) Запишите значение переменной s, полученное в результате работы следующей программы на языке программирования Паскаль.
Var s, i:integer;
Begin
S := 3;
For i := 2 to 5 do
S := S + 2*i;
Writeln(S);
end.

10) В таблице Sea хранятся данные о количестве россиян, отдыхавших на Черном море (Sea[1] - число россиян в 2001 году, Sea[2] - в 2002 и т.д.). Определите, какое число будет напечатано в результате работы следующей программы, написанной на языке программирования Паскаль.
Var k, s: integer;
Sea: array [1..12] of integer;
begin
Sea[] := 170; Sea[2] := 170;
Sea[3] := 190; Sea[4] := 210;
Sea[5] := 230; Sea[6] := 220;
Sea[7] := 240; Sea[8] := 160;
Sea[9] := 190; Sea[10] := 210; 
Sea[11] := 170; Sea[12] := 170;
s := 100;
For k := 1 to 12 do
if Sea[k] > 220 then
begin
s := s + Sea[k];
end;
Writeln(s);
end.

5) Дан фрагмент электронной таблицы, в первой строке которой записаны числа, а
во второй – формулы.
СМ во вложение.
evoque2014
Enter - ввод. Она предназначена для того, чтобы опускать текст ниже и переходить на следующую строку.
shift обычно используется для написания заглавных букв.
Кнопка Delete служит для удаления. 
esc Полное ее название Escape (произносится «Эске́йп») и означает она «Выход». При этой кнопки мы можем закрыть некоторые программы. В большей степени это касается компьютерных игр. 
Кнопка Insert нужна для того, чтобы печатать текст поверх уже напечатанного. Если Вы нажмете на эту клавишу, то новый текст будет печататься, стирая старый. Чтобы это отменить, нужно снова нажать на клавишу Insert.
Backspace — клавиша на клавиатуре компьютера, служащая для удаления символа (символов), находящегося перед курсором (слева при направлении письма слева направо или справа при направлении справа налево). Вне области набора текста ← Backspace часто служит для возврата на предыдущий экран программы или веб-страницу в браузере.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Составьте программу которая заполняет массив a[1..8] случайными целыми числами диапазоне от 1 до 10 и выводит на экран количество элементов с четными значениями и сумму элементов массива с нечетными значениями
Ваше имя (никнейм)*
Email*
Комментарий*