Из двух простых высказваний А= «Коля читает книгу»
Н=«Коля пьет молок»
составьте сложное высказывание«Коля читает книгу и пьет молоко»

Выбери верный ответ:
А и Н

Не А и не Н

Тогла А, когда зачем - то Н

А​

var s,s1: string; n,i: integer; begin readln(s); readln(n); for i: =1 to n do begin insert(s[1],s1,length(s1)+1); delete(s,1,1); end; s: =s+s1; writeln(s); end.

2 единицы в двоичной записи числа 1025

10000000001

var a,b,c,d: integer;

begin

  read(a,b,c,d);

  if (a*b*c*d mod 3 = 0) then

        writeln("pravda")

  else writeln("nepravda");

end.

если положить, что вода замерзает при нуле градусов, то:

program ice;

var temp : integer;

begin

writeln('введите температуру');

read(temp);

if temp > 0 then write ('вода не замерзнет')

else write('вода замерзнет');

end.