Задание:
1 Массив переменных a (10) заполнить последовательностью чисел от 1-10, затем с помощью минимального количества циклов отсортировать его по убыванию.
Решение:
qbasic не знаю, знаю только вижуал бэйсик for i=1 to 10 a (i)=iNext ifor i=1 to 5 b=a (10+1-i) a (10+1-i)=a (i) a (i)=bnext i s=0; for i=a to b if (i mod 2=1) and (i mod 3=0) then s=s+1 end ifnext i
Знаете другой ответ?