Задать вопрос
17 ноября, 21:56

Написать программу, которая бы запрашивала возраст мужчины и сообщала, сколько лет ему осталось до пенсии, либо что он уже пенсионер.

+5
Ответы (2)
  1. 17 ноября, 22:29
    0
    Var

    a: byte;

    begin

    write ('Vvedite vozrast: ') ;

    readln (a) ;

    if a > = 60 then writeln ('Pensioner!')

    else writeln ('Ostalos let do pensii:', (60-a) : 3) ;

    readln;

    end.
  2. 17 ноября, 23:41
    0
    Var

    v, p:integer;

    begin

    write ('введите возраст человека') ;

    readln (v) ;

    write ('введите пенсионный возраст') ;

    readln (p) ;

    if p>v then writeln ('до пенсии осталось ', p-v,' лет')

    else writeln ('он уже пенсионер') ;

    readln;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Написать программу, которая бы запрашивала возраст мужчины и сообщала, сколько лет ему осталось до пенсии, либо что он уже пенсионер. ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы