Помогите пж за спам бан
Var A: Array[1..6] of Integer; i, K: Integer;
Елементи масиву А мають значення:
А[i] −11 22 8 3 −8 1
Знайди значення змінної K після виконання фрагменту програми:
K := 0;
For i := 1 To 6 do
. .If (A[i] mod 2 =0) And (A[i]>0) Then K := K+ 1;
Please enter comments
Please enter your name.
Please enter the correct email address.
You must agree before submitting.

Answers & Comments


Copyright © 2024 SCHOLAR.TIPS - All rights reserved.