Форум программистов, компьютерный форум CyberForum.ru
CyberForum.ru - форум программистов и сисадминов > > >
Восстановить пароль Регистрация
 
Никита0723
Новичок
0 / 0 / 0
Регистрация: 21.04.2011
Сообщений: 3
21.04.2011, 22:02     Решение квадратного уравнения на паскале.   #1
Доброго времени суток. Нужна помощь в решении задачи по паскалю. Задача простейшая, но вот выдаёт ошибку.
Код Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Program ... ;
var 
a,b,c,D : real;
begin
Write ('Введите а: ');
Readln(a);
Write ('Введите b: ');
Readln (b);
Write ('Введите с: ');
Readln (c);
D= b^2 - 4*a*c ;
If d>0 then begin
Writeln( (-b + sqrt(D) )/2);
Writeln( (-b - sqrt(D) )/2);
and else if D=0 then
Writeln(-b/2);
else
Writeln ('Нет решений!') ;
Readln;
End.
Вот код собственно , выдаёт Error 121 Invalid qualifier. В строчке D= b^2 - 4*a*c ; а конкретно ругается на степень b.
AdAgent
Объявления
21.04.2011, 22:02    Решение квадратного уравнения на паскале.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
21.04.2011, 22:02    Решение квадратного уравнения на паскале.

Посмотрите здесь:

Turbo Pascal turbo Pascal: решение квадратного уравнения

Turbo Pascal корни квадратного уравнения

Turbo Pascal Найти корни квадратного уравнения

Turbo Pascal Решение квадратного уравнения с процедурой нахождения дискриминанта в Pascal

Turbo Pascal Решение квадратного уравнения ax2+bx+c=y

Turbo Pascal Условные переходы. Решение квадратного уравнения.

Turbo Pascal Вычислить корни квадратного уравнения

Turbo Pascal Текстовые файлы. Решение квадратного уравнения

Turbo Pascal Составление квадратного уравнения по двум корням

Turbo Pascal Программа квадратного уравнения

Qwark
Форумчанин
21 / 21 / 1
Регистрация: 28.01.2011
Сообщений: 72
21.04.2011, 22:14     Решение квадратного уравнения на паскале.   #2
D= sqr(b) - 4*a*c;
Никита0723
Новичок
0 / 0 / 0
Регистрация: 21.04.2011
Сообщений: 3
21.04.2011, 22:18  [ТС]     Решение квадратного уравнения на паскале.   #3
А почему там квадрат нельзя ставить, а через натуральный логориф ?
djtriotix
Новичок
4 / 4 / 1
Регистрация: 28.03.2011
Сообщений: 32
21.04.2011, 23:36     Решение квадратного уравнения на паскале.   #4
Можно и через логорифм(точнее через экспонент) и это нагрузит программу, но в паскале есть функция sqr(х) - что есть квадратом от аргумента х. А вот значек ^(стрелка вверх) в турбо паскале используется по совсем иным целям, если интересно, почитай про адресные типы данных.

Добавлено через 5 минут
Кстати это не решение квадратного уровнения, а проверка дискриминанта и вывод способов дальнейшего нахождения корней. Если цель задания показать пути нахождения то ошибка только в задании квадрата.
Yandex
Объявления
21.04.2011, 23:36    Решение квадратного уравнения на паскале.
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать новую тему
Опции темы

Текущее время: 13:39. Часовой пояс GMT +4.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.7 PL3
Copyright ©2000 - 2014, vBulletin Solutions, Inc.