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. подскажите где ошибка
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.
подскажите где ошибка
Гость
Ответ(ы) на вопрос:
Гостьпо-моему в 1 строке, и может 6
Не нашли ответ?
Похожие вопросы