Варіанти завдань до задачі №3
1. Знайти суму цілих додатніх чисел, кратних 4 і менших 50.
2. 3найти суму цілих додатніх парних чисел менших 50.
3. Знайти суму цілих додатніх чисел, більших 20, менших 100 і кратних 3.
4. 3найти суму цілих додатніх непарних чисел менших 50.
5. Знайти середнє арифметичне число всіх цілих додатніх чисел менших 20.
6. Знайти середнє геометричне число всіх цілих додатніх чисел менших 10.
7. 3найти суму цілих додатніх чисел кратних 7 і менших 100.
8. Вивести парні числа від 2 до 12.
9. Знайти суму цілих додатніх парних чисел менших 30.
11. Знайти суму цілих додатніх чисел, більших 10, менших 50 і кратних 3.
12. Знайти суму цілих додатніх непарних чисел менших 70.
13. Знайти середнє арифметичне число всіх цілих додатніх чисел менших 25.
14. 3найти середнє геометричне число всіх цілих додатніх чисел менших 20.
15. Вивести парні числа від 2 до 20.
12 Вивести цілі додатніх чисел кратних 8 і менших 89.
13. Знайти суму цілих додатніх парних чисел менших 30.
14 Знайти суму цілих додатніх чисел, більших 10, менших 70 і кратних 4.
15. Вивести цілі додатні парних чисел менших 26.
16. Знайти суму цілих додатніх непарних чисел менших 45.
17 Вивести цілі додатні числа, більших 10, менших 80 і кратних 6.
18 Вивести непарних чисел менших 25.
19. Вивести парні числа від 2 до 24.
20. Знайти суму цілих додатніх чисел, кратних 5 і менших 50.
21. Вивести числа кратні 7і менших 78.
22. 3найти суму цілих додатніх парних чисел менших 46.
23. Знайти суму цілих додатніх чисел, кратних 17 і менших 150.
24. 3найти суму цілих додатніх непарних чисел менших 94.
25. Знайти суму цілих додатніх чисел, більших 45, менших 180 і кратних 5.
26. 3найти суму цілих додатніх парних чисел менших 78 і кратних 8.
27. Знайти середнє арифметичне число всіх цілих додатніх чисел менших 43.
28. Знайти середнє геометричне число всіх цілих додатніх чисел менших 18.
29. 3найти суму цілих додатніх чисел кратних 11 і менших 210.
30. Вивести непарні числа від 0 до 134.
Задача № 4
ТЕМА: Створення та реалізація програм з масивами чисел.
Приклад реалізації програми опрацювання табличних величин.
Постановка задачі:
Скласти програму для роздрукування додатних елементів матриці А[1..3,1..4]. В кожному рядку друкувати елементи, які належать до даного рядка таблиці. Якщо в рядку немає додатніх елементів, то він повинен бути порожнім.
Програма роз'язання даної задачі мовою програмування Паскаль
Program mas7;
Const N=3;
М=4;
var А:аггау [l..N, l..M] of integer;
i, j: integer;
begin
writeln (’Введіть значення елементів масива:’);
writeln;
for i:=l to N do
begin
for j:=l to M do readln (A[i,j];
end;
writeln;
writeln (’Загальний вигляд масива до перетворення:’);
writeln;
for i:=l to 3 do
begin
for j:=l to 4 do write(A[i,j]:5);
writeln;
end;
writeln (’Загальний вигляд масива після перетворення:’);
for i:=l to 3 do
begin for j:=l to 4.do if A[i,j]>0 then write (A[i,j]:5)
else write (’ ’);
writeln;
end;
end.
Дані для введення: 1, 2, -3, 4, 2, -2, -6, 7, -1, -1, 3, 4.
Pезультат виконання програми.
Загальний вигляд таблиці до перетворення
1 2 -3 4
2 -2 -6 7
-1 -1 3 4
Загальний вигляд таблиці після перетворення
1 2 4
2 7
3 4