Решить систему двух линейных уравнений y1=2п-5 y2=4п-8+y=0 — QBasic(Бейсик)

p=3.14159
y1=2*p-5
y2=4*p-8
PRINT "y1=";y1
PRINT "y2=";y2

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