Вычислите и выведите на экран примерное число прожитых человеком дней (без учѐта високосных лет) , если в году 365 дней, а год рождения и текущий год запрашиваются у пользователя вашей программы. Паскаль.помогите срочно!!!!!!!!!!!!!!!!!!!!!!!!
Program zadanie; Var a,b:integer; Begin Writeln('Введите год рождения'); Read(a); Writeln('Введите текущий год'); Readln(b); If b>a Then begin a:=(b-a)*365; Writeln('Примерное число прожитых дней=',a); end Else If a>b Then Writeln('Не правильно указаны год рождения и текущий год') Else begin a:=a*365; Writeln('Примерное число прожитых дней=',a); end; End.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
