Версия для печати темы

Автор: мультик 25.05.2009 22:37

Помогите, не понимаю в чем дело

     Program Primer2;

    var 
       A,B,C: Integer;

    begin 
       Write('Введите А: '); 
       Readln(A); 
       Write('Введите B: '); 
       Readln(B); 
       C := A + B; 
       Write('A+B = ', C); 
       Readln; 
    end.  

нажимаю на Ctrl+F9 выдает А:, и еще пишет error 106: Invalid numeric format.
где не правильно подскажите?

Автор: volvo 25.05.2009 22:45

Скриншот сними, как именно ты получаешь ошибку... Есть подозрение, что у тебя проблема с прописыванием рабочих папок, зайди в Options -> Directories случайно там ничего не ссылается на диск A:?

Или ты вводишь не целое, а вещественное число на запрос компьютера...

Автор: мультик 26.05.2009 12:10

Автор: мультик 26.05.2009 12:31

а вот еще

Автор: Lapp 26.05.2009 13:19

И что ты вводишь? Нужно вводить числа. А ты ей что даешь?.. И что ты ожидаешь получить?

Еще непонятно, что эта тема делает в разделе Теория. Типичная ошибка в задаче. Да еще полный код..
Переношу в Задачи.

Автор: Ozzя 26.05.2009 13:25

Выводится А
А exit кто набирал?

Автор: мультик 26.05.2009 14:21

та же самая ситуация с цифрами, выводитсья 3, не решается

Автор: Lapp 26.05.2009 14:42

Скриншоты - в студию! )

Автор: мультик 26.05.2009 16:12

что я не так делаю, вроде простенькая задачка.

Автор: volvo 26.05.2009 16:21

Ну, напечатало тебе "10", что дальше? Где твой ввод данных??? Программа ждет, пока ты введешь значение, ты этого не делаешь. Что ты хочешь, чтоб происходило?

Автор: Lapp 26.05.2009 16:40

Да, мультик, не так.

Сделай вот, что:

запусти старый варинат программы (где Write('A') )
когда она напишет "А", нажми на клавиатуре, например, 5, а потом нажми Энтер
программа напишет "В"
тогда ты нажми типа 8 и Энтер
после этого программа должна тебе вывести, что сумма равна 13
после этого нажми еще рах Энтер и окажешься снова в Турбо

Успехов!

Автор: мультик 26.05.2009 16:44

все ясно, получилось, спасибо