Нужна помощь.

Нужно написать пару легких программ в Qbasic.
1,проверьте, делится ли числа А на число В без остатка(числа А и В вводятся.
2.даны три действительных числа А,В,С.определить сколько среди них отрицательных.

 

точно синтаксис не помню ща посотрю еси что поправлю и 2 напишу
INPUT a, b
if a mod b =0 then print "Делится без остатка" else print "Не делится без остатка"
end

 

INPUT a, b, c
if a<0 then k=k+1
if b<0 then k=k+1
if c<0 then k=k+1
print "Отрицательных чисел" k
end

вот и все! элементарные задачки

 

Спасибо.

 

всегда пожалуйста! обращайся