Даны три действительных числа a, b, c. Найти наибольшее из них — QBasic(Бейсик)

disel
1
2
3
4
5
6
7
CLS
INPUT "CHISLO 1", a
INPUT "CHISLO 2", b
INPUT "CHISLO 3", c
IF a > b THEN max = a ELSE max = b
IF c > max THEN max = c
PRINT max

Тестирование выполнено в программе QB64 ( Скачать )

Похожие записи/страницы:

Leave a Comment