Найдите и выведите на экран те слова, которые оканчиваются на букву "Я"

Задайте символьный массив.

code: #basic
INPUT "vvedite kol-vo slov ",n
DIM a$(n)
FOR i=1 TO n
INPUT "vvedite slovo ",a$(i)
NEXT
 
FOR i=1 TO n
IF RIGHT$(a$(i),1)="я" THEN PRINT a$(i)
NEXT 

автор: кот Бегемот

Поделиться:

Похожие статьи: