М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации

Visual basic 1)укажите допустимые имена: а)переменная б)g1g2h3 в)dim г)d& g д)2_значное е)нов.значение ж)qaz wer 2. определите значение переменных по фрагменту программы с трассировки: а)dim a as string, b as string, c as string a = “у нас ” b = “3” с = a & b & “пары” б)dim q1 as integer, q2 as integer const q as integer = 15 q1 = 1 q2 = 2 q1 = q + q2 q2 = q1 *q2 с)dim a as byte, b as byte, c as byte a = 3 b = 100 b = b + a с = a * b

👇
Ответ:
Selima2005
Selima2005
21.03.2020

1: а,б (в-зарезерв.слово, д-с цифры, г,е - спецсимвол (& и .), ж - пробел)

2а:  "У нас 3пары" (вот именно так с пробелами)

 

2б: q1=1   q2=2   q1=15+2=17   q2=17*2=34

2с: а=3   б=100   б=100+3=103    с=3*103=309

 

 

 

 

 

 

 

4,6(64 оценок)
Открыть все ответы
Ответ:
арина1382
арина1382
21.03.2020
Rem BASIC-256
cls
errors = 0
print "Введите текст > ";

rem Пользователь вводит текст
input a$

rem Перебираем все буквы с начала и до предпоследней
for i=1 to length(a$)-1

rem Если встречаем букву Ч или Щ
if mid(a$, i, 1) = "ч" or mid(a$, i, 1) = "щ" then

rem Тогда проверяем следующую за ней букву.
rem Если это буква я, тогда подсчитываем очередную ошибку
if mid(a$, i + 1, 1) = "я" then errors = errors + 1
end if

rem Переходим к следующей букве
next i

rem Вывод результата
print "Количество ошибок в тексте ";
print errors

rem Конец программы
end
4,5(18 оценок)
Ответ:
Perestroika
Perestroika
21.03.2020
var                                      
i,z,y,x: integer;                 // объявление переменных
begin                              // начало программы
writeln('Введите числа: '); // Вывод сообщения
readln(x,y);                      // Ввод чисел х и у с клавиатуры
while i <> y do                 // Повторять цикл пока i не будет равно y
 begin                             // Вход в цикл
 z:=z+x;                          // z = z + x  (при первом шаге получается 0 = 0 + х) 
 i:=i+1;                            // Увеличиваем счетчик цикла на 1 
 end;                               // Выход из цикла
write(z);                           // Вывод z (произведение х и у)
end.                                // Конец программы 
4,5(32 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ