ТутРешу.Ру

Дана строковая величина вывести на экран второе слово

Задание:

Дана строковая величина вывести на экран второе слово. Информатика Turbo Pascal

Решение:

var a: string; for i: =1 to length (a) dog: =i; if a[i]=' then beginfor g to length (a) writeln (a[g]); end;




Знаете другой ответ?

Отправить свой ответ