Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 26.04.2011, 19:14   #1
Newbie.
 
Регистрация: 26.04.2011
Сообщений: 3
По умолчанию Не знаю в чём ошибка..

Доброго времени суток, форумчане. Пожалуйста, подскажите где моя ошибка? Буду очень благодарен.
Код:
program prgmm;
uses crt;
var number1, number2, result:real; 
:integer; 
begin
number1 :=5;
number2 :=6;
result :=number1 + number2;
write (number1 ,'+', number2, '=', result);
end.
Ошибка 36: Begin expected

Последний раз редактировалось Newbie.; 26.04.2011 в 19:35.
Newbie. вне форума
Старый 26.04.2011, 19:17   #2
Сtrl
C++
Форумчанин
 
Аватар для Сtrl
 
Регистрация: 27.03.2011
Сообщений: 803
По умолчанию

Код:
var number1, number2, result:real; 
:integer;
Какая переменная у вас типа integer?
Код:
result :=number1 + number2 + number3;
Не объявлена переменная number3.
Код:
write (number1 ,'+', number2, '=', result);
end.
А результат на экране задержать не желаете? Добавьте readln;
Ищете информацию по C++?
cplusplus.com
Сtrl вне форума
Старый 26.04.2011, 19:24   #3
Newbie.
 
Регистрация: 26.04.2011
Сообщений: 3
По умолчанию

Цитата:
Сообщение от Сtrl Посмотреть сообщение
Код:
var number1, number2, result:real; 
:integer;
Какая переменная у вас типа integer?
Не понял до конца суть вопроса.
Цитата:
Сообщение от Сtrl Посмотреть сообщение
Код:
result :=number1 + number2 + number3;
Не объявлена переменная number3.
Извиняюсь, не все убрал.
Цитата:
Сообщение от Сtrl Посмотреть сообщение
Код:
write (number1 ,'+', number2, '=', result);
end.
А результат на экране задержать не желаете? Добавьте readln;
Спасибо, забыл как-то.

Последний раз редактировалось Newbie.; 26.04.2011 в 19:45.
Newbie. вне форума
Старый 26.04.2011, 19:45   #4
Newbie.
 
Регистрация: 26.04.2011
Сообщений: 3
По умолчанию

Ошибку нашел, вот что получилось.
Код:
program prgmm;
uses crt;
var 
number1, number2, result:real;
begin
number1 :=5;
number2 :=6;
result :=number1 + number2;
write (number1 '+', number2, '=', result);
readln;
end.
В итоге пишет: 5.0000000000E+00+ 6.0000000000E+00= 1.1000000000E+01
Что-то не так, по-моему.
Newbie. вне форума
Старый 26.04.2011, 19:56   #5
Alex11223
Старожил
 
Аватар для Alex11223
 
Регистрация: 12.01.2011
Сообщений: 19,500
По умолчанию

Код:
write (number1:3:0, '+', number2:3:0, '=', result:3:0);
как-то так, где 3 - ширина выводимого поля, где 0 - кол-во цифр после . (дробных).
Вы уверены, что вам real нужен, а не integer?)
Ушел с форума, https://www.programmersforum.rocks, alex.pantec@gmail.com, https://github.com/AlexP11223
ЛС отключены Аларом.
Alex11223 вне форума
Старый 26.04.2011, 19:56   #6
madkot
 
Регистрация: 19.04.2011
Сообщений: 7
По умолчанию

Так вроде нет ошибки..5+6=11 (1.1000000000E+01 - это вроде как вещественная форма записи числа 11). Попробуйте вместо real использовать integer, так будет нагляднее.
зы: в этой строчке
Код:
write (number1 '+', number2, '=', result);
вроде как не хватает запятой после number1
madkot вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
В чём ошибка? Jony217 Общие вопросы C/C++ 12 02.04.2011 09:03
Не знаю в чём проблема, в сетевой карте, или в винде Altera Компьютерное железо 11 11.11.2009 15:21
Не знаю в чём проблема Castro Паскаль, Turbo Pascal, PascalABC.NET 5 24.12.2008 01:38