В массиве из 10 элементов найти и отпечатать колличество и сумму элементов, значение которых больше последнего элемента массива — QBasic(Бейсик)

1
2
3
4
5
6
7
k=0
s=0
FOR i=1 TO 10
IF a(i)>a(10) THEN k=k+1 AND s=s+a(i)
NEXT i
PRINT(i)
PRINT(s)

Тестирование выполнено в программе QB64 ( Скачать )

Leave a Comment