Var d1,m1,y1,d2,m2,y2: integer; begin write( 1-я - вопрос №72466441112221111 от bochinskaya06 19.12.2020 02:50

Question

Информатика: Var d1,m1,y1,d2,m2,y2: integer; begin write( 1-я дата: ); readln(d1,m1,y1); write( 2-я дата: ); readln(d2,m2,y2); if (y1 then writeln( правильно ) else writeln( неправильно ); end. подскажите где ошибка

bochinskaya06 · Answer

По-моему в 1 строке, и может 6...

Var d1,m1,y1,d2,m2,y2: integer; begin write('1-я дата: '); readln(d1,m1,y1); write('2-я дата: '); readln(d2,m2,y2); if (y1 then writeln('правильно') else writeln('неправильно'); end. подскажите где ошибка