Регистрация
rhxtdf
14.01.2022 20:44
Информатика
Есть ответ 👍

Выбери допустимые имена файлов. modem?.bmp
Oscience:??..ggb
О |modem | **.ggb
*modem\.ggb
modem.bmp
Oscience.ggb

178
484
Посмотреть ответы 2

Ответы на вопрос:

Эрбол11111
Эрбол11111
4,8(97 оценок)

modem.bmp Oscience.ggb, вроде так

Dark119277
Dark119277
4,7(34 оценок)
    program main     integer i,j,k     logical flag     integer a,b     dimension a(5,10)     dimension b(50)     equivalence (a,b)     read *,(b(i),i=1,50)     do 70 i=1,5           print *,(a(i,j),j=1,10) 70 continue       do 100 j=10,1,-1       flag=.true.       k=j       do 200 i=1,5             if (a(i,j) .le. 0) then                              flag=.false.                 goto 100             end if 200    continue       if (flag) goto 300 100 continue 300 print *,'k=',k end program main

Популярно: Информатика