var a,b,c,d:integer; begin writeln('Напиши дату основания Санкт-Питербурга(день месяц и год)'); writeln('день'); read(a); writeln('месяц'); read(b); writeln('год'); read(c); if (a=27) and (b=5) and (c=1703) then writeln('Молодец всё правильно') else writeln('Ты где то допустил ошибку'); end.
Answers & Comments
Verified answer
var a,b,c,d:integer;
begin
writeln('Напиши дату основания Санкт-Питербурга(день месяц и год)');
writeln('день');
read(a);
writeln('месяц');
read(b);
writeln('год');
read(c);
if (a=27) and (b=5) and (c=1703) then
writeln('Молодец всё правильно')
else
writeln('Ты где то допустил ошибку');
end.