Форум программистов, компьютерный форум 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 Программа квадратного уравнения

Поиск по форуму:
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     Решение квадратного уравнения на паскале.
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Опции темы

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