Program1.pas(10) : Встречено ‘Const’, а ожидался оператор Program dialog; var a,b,c,d:string; begin writeln(‘Як тебе звати ?’); readln(a); writeln(‘Скільки тобі років? ‘); readln(b); writeln(‘в якому ти классі ?’); readln(c); Const; A = 11; B = 9; writeln(‘Тобі залишилося вчитися’, A — B); { <-- Выводим сумму } readln { <-- нажимаем Enter и выходим из программы } end.

Вопрос школьника по предмету Информатика

Program1.pas(10) : Встречено ‘Const’, а ожидался оператор
Program dialog;
var a,b,c,d:string;
begin
writeln(‘Як тебе звати ?’);
readln(a);
writeln(‘Скільки тобі років? ‘);
readln(b);
writeln(‘в якому ти классі ?’);
readln(c);
Const;
A = 11;
B = 9;

writeln(‘Тобі залишилося вчитися’, A — B); { <-- Выводим сумму }
readln { <-- нажимаем Enter и выходим из программы }
end.

Ответ учителя по предмету Информатика

Ответ:

Program dialog;

var  

   a,b:string;

   c:integer;

begin

writeln(‘Як тебе звати ?’);

readln(a);

writeln(‘Скільки тобі років? ‘);

readln(b);

writeln(‘в якому ти классі ?’);

readln(c);

writeln(‘Тобі залишилося вчитися ‘, 11- c); { <— Выводим сумму }

readln { <— нажимаем Enter и выходим из программы }

end.

Объяснение:

Обойтись можно и без констант в принципе.

Если я правильно понял суть задачи, то, собственно, вот