Задание:
Коэффициенты a,b,c вводятся с клавиатуры. На экране выводится информация о значении корней квадратного уравнения. _СОСТАВЬТЕ ПРОГРАММУПАСКАЛЬ
Решение:
program ms301; var a,b,c: integer; beginwriteln ('Введите три числа'); readln (a,b,c); A: =sqrt (a); B: =sqrt (b); c: =sqrt (c); writeln (a,', ',b,', ',c); readln; end;
Знаете другой ответ?