жёлтый лимон синяя луковица лимон и 2 луковицы синей
Var s : string;
var t : string;
begin
writeln ('Введите S:');
readln (s);
writeln ('Введите T:');
readln (t);
writeln (s+t);
end.
Внешняя память хранение данных
A B A and B ¬A or not A ¬B and not b
0 0 0 1 1 1 1
0 1 0 1 1 0 0
1 0 0 0 0 1 0
1 1 1 0 1 0 0
Program n1;
var x,y: real;
begin
readln(x,y);
if y=3*x-2 then write('лежит')
else write('не лежит');
end.