Регистрация
nikusachev01
23.03.2023 07:40
Информатика
Есть ответ 👍

Задание 2. Выполнить конспект. Выполнить задание 30.

215
413
Посмотреть ответы 1

Ответы на вопрос:

violettapolen95
violettapolen95
4,4(77 оценок)

clsinput  ainput binput  cif b < = c and b < = a then w = b: b = a: a = wif c < = a and c < = b then w = c: c = a: a = wif c < = b then w = c: c = b: b = wprint a; b; cend

 

clsa: input "введи a"; aif a = 0 then print "уравнение не квадратное": sleep 1: goto ainput "введи b"; binput "введи c"; cd = b ^ 2 - 4 * a * cif d < 0 then print "нет решений": endx1 = (-b + sqr(d)) / (2 * a)x2 = (-b - sqr(d)) / (2 * a)print "x1="; x1print "x2="; x2

Популярно: Информатика