var
A, B, C: Integer;
begin
Write('Введите А:');
Readln(A);
Write('Введите B:');
Readln(B);
C := A + B;
Write('A+B = ', C);
Readln;
end.
Помогите разобраться в Fpc (примитив)
Здрасвуйте!
Подскажите полнейшему ламеру как запустить примитивнейшую программку с переменными типа
begin
Write('Введите А: 5');
Readln(A);
Write('Введите B: 7');
Readln(B);
C := A + B;
Write('A+B = ', C);
Readln;
end.
У меня появляется только 5 :{ ...
Понимаю, что это смешно, но с начинать с чего-то приходиться...
Подскажите полнейшему ламеру как запустить примитивнейшую программку с переменными типа
begin
Write('Введите А: 5');
Readln(A);
Write('Введите B: 7');
Readln(B);
C := A + B;
Write('A+B = ', C);
Readln;
end.
У меня появляется только 5 :{ ...
Понимаю, что это смешно, но с начинать с чего-то приходиться...
Цитата:
Originally posted by ap_b
Здрасвуйте!
Подскажите полнейшему ламеру как запустить примитивнейшую программку с переменными типа
begin
Write('Введите А: 5');
Readln(A);
Write('Введите B: 7');
Readln(B);
C := A + B;
Write('A+B = ', C);
Readln;
end.
У меня появляется только 5 :{ ...
Понимаю, что это смешно, но с начинать с чего-то приходиться...
Здрасвуйте!
Подскажите полнейшему ламеру как запустить примитивнейшую программку с переменными типа
begin
Write('Введите А: 5');
Readln(A);
Write('Введите B: 7');
Readln(B);
C := A + B;
Write('A+B = ', C);
Readln;
end.
У меня появляется только 5 :{ ...
Понимаю, что это смешно, но с начинать с чего-то приходиться...
То есть? Не вводится B??
Именно.
Не вводиться и не выводиться больше ничего вообще.
Не вводиться и не выводиться больше ничего вообще.
Цитата:
Originally posted by ap_b
Именно.
Не вводиться и не выводиться больше ничего вообще.
Именно.
Не вводиться и не выводиться больше ничего вообще.
А у тебя A, B и C какого типа?
VAR
A, B, C: INTEGER
A, B, C: INTEGER
Цитата:
Originally posted by ap_b
VAR
A, B, C: INTEGER
VAR
A, B, C: INTEGER
Чё-то я нихрена не понял что требуется...Надо вводить А=5 ,B=7 и в результате получить 12.Так что ли???
program prog;
var A,B,C:integer;
begin
Write('Vvedite A: 5');
Readln(A);
Write('Vvedite B: 7');
Readln(B);
C := A + B;
Write('A+B = ', C);
Readln;
end.
:o
Цитата:
Originally posted by ap_b
Здрасвуйте!
Подскажите полнейшему ламеру как запустить примитивнейшую программку с переменными типа
begin
Write('Введите А: 5');
Readln(A);
Write('Введите B: 7');
Readln(B);
C := A + B;
Write('A+B = ', C);
Readln;
end.
У меня появляется только 5 :{ ...
Понимаю, что это смешно, но с начинать с чего-то приходиться...
Здрасвуйте!
Подскажите полнейшему ламеру как запустить примитивнейшую программку с переменными типа
begin
Write('Введите А: 5');
Readln(A);
Write('Введите B: 7');
Readln(B);
C := A + B;
Write('A+B = ', C);
Readln;
end.
У меня появляется только 5 :{ ...
Понимаю, что это смешно, но с начинать с чего-то приходиться...
Насколько я понял проблему, то видимо программа должна выглядеть так:
Код:
Когда ты ее запустишь, на экране выведется подсказка
Введите A:_
Вот тут ты на клавиатуре должен набрать 5 и нажать Enter - появится следующая подсказка
Введите B:_
Набираешь на клавиатуре 7, жмешь Enter - выводится результат
A+B = 12
Программа завершится после очередного нажатия Enter.
Удачи!
спасибо sp999, misha_turist и Spirale