Не понятен 3 пункт в Вашем задании. var x,k: integer; begin write ('Введите значение переменной X: '); read (x); if (x>3) then begin k:=2*x+5; writeln ('Значение K в уравнении k=2*x+5 = ',k); end; if (x<6) then begin k:=2*x-3; writeln ('Значение K в уравнении k=2*x-3 = ',k); end; end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку