Вы используете устаревший браузер. Этот и другие сайты могут отображаться в нём некорректно. Вам необходимо обновить браузер или попробовать использовать другой.
Блок схема в QBasic
CONST n = 27
DIM k(n)
RANDOMIZE TIMER
FOR i = 1 TO n
k(i) = INT(RND * 91) - 45
NEXT
p = 1: im = 1
FOR i = 1 TO n
p = p * k(i)
IF k(i) > k(im) THEN im = i
NEXT
FOR i = 1 TO n
PRINT k(i);
NEXT
PRINT STRING$(80, 196)
PRINT "p="; p, "max = k("; im; ") = "; k(im)
FOR i = 1 TO n...
На данном сайте используются файлы cookie, чтобы персонализировать контент и сохранить Ваш вход в систему, если Вы зарегистрируетесь.
Продолжая использовать этот сайт, Вы соглашаетесь на использование наших файлов cookie.