1.точку после Энда ставить нужно
readln(a);
readln(b);
2.c:=a*b;
3.writeln('proizvedenie a i b ravno,c);
4.Readln(c);
Ответ:
program Test;
var
n, t: Integer;
b: Boolean;
begin
Write ('Введите трехзначное число: ');
ReadLn (n);
if (n >= 100) and (n <= 999) then begin
if (n mod 10) mod 2 = 0 then
WriteLn ('четная')
else
WriteLn ('не четная');
end else
WriteLn (n, ' - не трехзначное');
ReadLn;
end.
<span>во первых есть иструмент называюший текстовый документ, он идёт в стондартных програмах винды и любой другой операционки, так же есть формат блокнот, но kelobv я считаю формат ворд он идёт с програмой офис, чтобы создать текстовый документ, надо правой кнопкой кликнуть по рабочему столу и в контексном меню выброть создать текстовый документ или документ ворд если установлен овис, потом открыть и печатать</span>
Смотри, x:=x+y Сам Y у нас тут не меняется, значит менялся только X. отсюда получаем 4=x+27 обычное уравнение. x=4-27=-23.
А т.к. Y не менялся, первоначальные значения равны:
x=-23, y=27