Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Монокль
28.09.2020 14:37 •
Информатика
Напишите программу языком бэйсик "напечатать таблицу соответствия между квадратными метрами и гектарами для значений от 0.5 га до 6.5 га с шагом 0.5га"
Показать ответ
Ответ:
teunov
07.10.2020 11:13
' Цикл While
Dim GA as Double
GA = 0.5
Do While GA <= 6.5
print GA, " га = "; GA * 10000, " квадратных метров"
GA = GA + 0.5
Loop
' Цикл For
Dim X as Double
PRINT "X" , "Y"
FOR X=0.5 TO 6.5 STEP 0.5
PRINT X , X*10000
NEXT
' For с двумя переменными
Dim X as Double
Dim Y as Double
PRINT "X" , "Y"
FOR X=0.5 TO 6.5 STEP 0.5
Y = X * 10000
PRINT X , Y
NEXT
0,0
(0 оценок)
Популярные вопросы: Информатика
nikita2429p09umg
11.08.2020 14:07
Записать в поле длиной 2 байта число 11000011110101. Пронумеровать разряды....
пятимейкер
20.04.2022 05:16
получено сообщение, информационный объём которогоравен 4096 бит. чему равен информационный объем этогосообщения в килобайтах? ...
RobloxTop
14.09.2021 18:02
Установите соответствие.8 бит2 мбайт1024 байта1 байт2 байта1 кбайт2018 кбайт16 бит...
halimattek
23.09.2020 17:41
Запиши число 14531 в развёрнутом виде, начиная со старшего разряда. help me информатика 8 класс...
Katykpoper
13.05.2020 03:48
Рассчитай объём видеопамяти, необходимой для хранения графического изображения, занимающего весь экран монитора с разрешением 640×350 и палитрой из 16777216 цветов....
Анонимка00
04.10.2021 23:59
Вопрос легкий и маленький! (для тех кто разбирается) выбери верный ответ. яркость - 0 red - 1 green - 0 blue - 1 цвет -...
aknietzhumanova
26.09.2021 14:49
Обьесните каждую команду каждую строчку что где происходит program z_8; var i, s2, s3, s4, s5: integer; a: array [1..20] of integer; begin for i: =1 to 20 do begin a[i] :...
hiraimomorin
02.12.2022 16:02
30 ! составьте программу и вывода на экран в столбик элементов массива.в массиве 19 целых чисел из интервала от 27 до 74....
Простокнигоманка
06.07.2020 00:26
Для скольких натуральных чисел x истинно высказывание: (x 3)& (x 12) в ответе укажите одно число количество натуральных чисел x...
Kamilkamilka222
14.11.2020 20:41
Какой числовой промежуток задан для значений элементов массива оператором: а[i]: =random(43)+26?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Dim GA as Double
GA = 0.5
Do While GA <= 6.5
print GA, " га = "; GA * 10000, " квадратных метров"
GA = GA + 0.5
Loop
' Цикл For
Dim X as Double
PRINT "X" , "Y"
FOR X=0.5 TO 6.5 STEP 0.5
PRINT X , X*10000
NEXT
' For с двумя переменными
Dim X as Double
Dim Y as Double
PRINT "X" , "Y"
FOR X=0.5 TO 6.5 STEP 0.5
Y = X * 10000
PRINT X , Y
NEXT