Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   Болталка (https://forum.antichat.xyz/forumdisplay.php?f=46)
-   -   Нужна помощь. (https://forum.antichat.xyz/showthread.php?t=177442)

Flaber 09.02.2010 10:56

Нужна помощь.
 
Помогите написать програмки в QBASIC.всех отблагадорю
1.Напишите программу.определяющую четность или не четность введенного с клавиатуры числа.
2.напишите программу,находящую меньшее из двух чисел,введенных с клавиатурш.

EndLeSSDre@M 09.02.2010 11:24

точно синтаксис не помню... и так же не помню если ли функция вычисляющая остаток от деления... а было бы намного проще

CLS
INPUT «введите « N»; N
k=Int(N/2)
if k=N/2 then print "Четное" else print "Не четное"
End

Вторая:

CLS: INPUT " ";X, Y
IF X < Y THEN
PRINT "Наименьшее число X="; X
ELSE
PRINT "Наименьшее число Y=";Y
END IF
END


Воть и фсе)))


Время: 15:37