1)
const n = 20;
var
a: array[1..n] of integer;
i, s: integer;
begin
for i := 1 to n do begin
a[i] := random(50);
write(a[i], ' ');
if(a[i] mod 7 = 0) then s := s + a[i];
end;
writeln;
writeln('Сумма эл., кратных 7: ', s);
end.
2)
const n = 8;
var
a: array[1..n] of integer;
i, s: integer;
begin
for i := 1 to n do begin
a[i] := random(50);
write(a[i], ' ');
if(a[i] mod 2 <> 0) then s := s + a[i];
end;
writeln;
writeln('Сумма нечетных эл: ', s);
end.
3)
const n = 10;
var
a: array[1..n] of integer;
i, s, count: integer;
begin
for i := 1 to n do begin
a[i] := random(50);
write(a[i], ' ');
if(i mod 2 = 0) then begin
s := s + a[i];
inc(count);
end;
end;
writeln;
writeln('Ср. арифметическое эл. с четными номерами: ', s / count);
end.
N1
var a, b: integer;
• begin
• readln(a, b);
• a := a mod 2;
b := b mod 2;
• if (b > 0) and (a > 0) then
• writeln ('четных чисел нет')
• else
• writeln ('четное число есть');
<span>end.
</span>
N2
#include <iostream>
using namespace std;
int main()
{
int a;
cin >> a;
if(a < 100 || a > 999) cout << "Неверное число" << endl;
else
{
int a1 = a/100;
int a2 = (a/10)%10;
int a3 = a%10;
if(a1%2==a2%2==a3%2==0) cout << "Да" << endl;
else cout << "Нет" << endl;
}
return 0;
}
Это ведь очень легко! Изначально в ячейке А2 была записана формула "=A1+B2". Посредством копирования в соседнюю правую и соседнюю нижнюю ячейки можно получить <span>"= В1+С1" и "=А2+В2" соответственно.</span>
Да! может содержать вложенные каталоги
Друга ищи, а найдешь - береги
Старый друг лучше новых двух
