Нужно переделать программу из Pascal в VBasic
Формулировка задачи:
Попросили меня сделать программу, выполнил я её на Pascal, но надо на VisualBasic.
Вот программа, выполняющая подсчет десятизначных чисел, в которых цифры не повторяются.
С синтаксисом VB я не знаком, помогите пожалуйста.
Решение задачи: «Нужно переделать программу из Pascal в VBasic»
textual
Листинг программы
program Nya^_^4 var k,d:integer; begin k:=40; if k mod 12 = 4 then d:=k else if k mod 12 < 5 then d:=2 else if k div 12 > 4 then d:=3 else d:=1; writeln (d); readln; end.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д