Составить программу для нахождения суммы S диагоналей прямоугольной трапеции, заданной длинами оснований A и В и высотой H — QBasic(Бейсик)

CLS
INPUT " Vvedite: dlini osnovaniy i visoti", a, b, h
c = SQR(a ^ 2 + h ^ 2)
d = SQR(b ^ 2 + h ^ 2)
s = c + d
PRINT s

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