Даны 2 массивы А(5) и B(5). Сформируйте массив С(10),предварительно определив его длину, каждый четный по номеру элемент которого равен сумме соответствующих элементов из А и В,а нечетный — их разности:С(1)=А(1)=В(1);С(2)=А{1)-В(1);С(3)=А(2)+В{2);С(4)=А(2)-В(2)… . Выведите на экран массивы А(5),В(5) и С(10).- QBasic(Бейсик)

DIM a(5), b(5), c(10)
RANDOMIZE TIMER
FOR i = 1 TO 5
    a(i) = INT(RND * 10)
    b(i) = INT(RND * 10)
NEXT
PRINT "massiv A"
FOR i = 1 TO 5
    PRINT a(i);
NEXT
PRINT
PRINT "massiv B"
FOR i = 1 TO 5
    PRINT b(i);
NEXT
PRINT
FOR i = 1 TO 5
    c(i * 2 - 1) = a(i) - b(i)
    c(i * 2) = a(i) + b(i)
NEXT
PRINT "massiv c"
FOR i = 1 TO 10
    PRINT c(i);
NEXT

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

Leave a Comment