Составить программу, определяющую является ли число введенное с клавиатуры кратным пяти. Ответ выводится в формате "Да" или "Нет". (В QBasic)

бейсик не учил, но в паскале примерно так.Program z123;var a:integer;  вроде у вас это input a if a mod 5 = 0 then write ('ваше число кратно пяти') else write ('не кратно пяти );end.

INPUT aIF a MOD 5 = 0 THEN PRINT "yes" ELSE PRINT "no"