Ввести с клавиатуры 10 чисел. Если квадрат числа меньше 100 , напечатать число и его квадрат Программа QBasic

CLS 

PRINT" Введите 10 чисел "  

FOR i=1 TO 10

INPUT  A

IF (A*A)<100 THEN PRINT A :PRINT "   ":  PRINT (A*A)

NEXT I

END

 

             

 

 

 

 

 

 

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку