Одновимірний масив N із 10 дійсних чисел
Var
N: array[1..10] of real;
Одновимірний масив Date із 20 цілих чисел
Var
Date: array [1..20] of integer;
Сума всіх елементів масиву,
який складається з 30 елементів
For i := 1 to 30 do
S := S + A[i]
Елементи довільного масиву дорівнюють квадратам своїх індексів
For i := 1 to 10 do
A[i] := i*i; // или A[i] := Sqr(i);
Ввести з клавіатури в масив 20 цілих чисел
For i := 1 to 20 do
Read(A[i])
Птица летит
Птица чирикает
Птица кушает (активные)
Птицу кормят
Птицу купают
За птицей ухаживают (пассивные
Мяч скачет
Мяч укатился в канаву
Мяч попал в корзину (активные)
Мячом играют
Мяч забросили в корзину
Мяч пнули (пассивные)
Велосипед упал
Велосипед сломался
Велосипед поржавел (активные)
На велосипеде катаются
Велосипед чинят
Велосипед чистя (пассивные)
Ответ: 3)
клетки удовлетворяющие условию: D1, D2, D3, D6, F6, F5, F4, F3 ,F2, F1, B2, B1, C2, C1, E1 ,E2, E3
Последний столбик в каждой таблице это и есть твоё C