Дано количество студентов. Ввести имена студентов и их год рождения. определить через сколько лет они получат право голоса или сделать ывод, чтоони имеют право голоса

Дано количество студентов. Ввести имена студентов и их год рождения. определить через сколько лет они получат право голоса или сделать ывод, чтоони имеют право голоса
Гость
Ответ(ы) на вопрос:
Гость
CLS DIM n AS INTEGER INPUT "Введите кол-во студентов:", n DIM studentYearsOld(1 TO n) AS INTEGER DIM studentName(1 TO n) AS STRING FOR i = 1 TO n INPUT "Введите имя студента:", studentName(i) INPUT "Введите год рождения студента:", studentYearsOld(i) NEXT i PRINT FOR i = 1 TO n PRINT "Студент "; studentName(i) studentYrs = 2016 - studentYearsOld(i) IF studentYrs < 18 THEN PRINT "Лет до права голоса:"; 18 - studentYrs ELSEIF studentYrs >= 18 THEN PRINT "Студент уже имеет право голоса!" PRINT END IF studentYrs = 0 NEXT i Код валидный, если допустил ошибку во время переписывания - сообщите.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы