Есть ответ 👍

Создать массив целых чисел, найти сумму четных элементов массива, результат вывести на экран

291
359
Посмотреть ответы 3

Ответы на вопрос:


На perl: #! /usr/bin/perl for($i=0; $i< 100; $i++){   @arr[i]=int(rand(100));   if (@arr[i]%2==0){ [email  protected][i]} }; print $sum;
Mirgorodska
4,6(57 оценок)

Const        n=5; var                a: array [1..n] of integer;                         i: byte;                         s: integer; begin writeln ('vvedi mas a'); for i: =1 to n do readln (a[i]); s: =0; for i: =1 to n do if i mod 2=0 then s: =s+a[i]; writeln ('s=',s); readln; readln end.

Windows, Linux, Mac OS

Объяснение:

Популярно: Информатика