Напишите программу, которая вводит адрес файла и «разбирает» его на части, разделенные знаком '/'. каждую часть нужно вывести в отдельной строке. пример: введите адрес файла: c: /фото/2015/байкал/shaman. jpg c: фото 2015 байкал shaman. jpg на языке паскаль и с объяснениями !

канал - 5букв

телевизор,компьютер 9букв

крик - 4буквы

  я тут немного отсебятины добавил, что бы программа не слетала если что-то нерпавильное вводиш))

vara: string; b: integer; beginwriteln ('введите строку'); read (a); if (a='город минск')then writeln ('город минск')elsebeginwriteln ('введите "город минск", 1-продолжить, 0-выйти'); read (b); end; while (b = 1) dobeginwriteln ('введіте строку'); read (a); if (a='город минск')then writeln ('город минск')elsebeginwriteln ('введите "город минск", 1-продолжить, 0-выйти'); read (b); end; end;

end. 

может кто перепишет на паскаль

вот на c:

#include < stdio.h> int main(void){  int km, day;   day = 1;   km = 10;   while (km < = 200)  {  if (km == 20)  {    printf("20km in %d day\n", day);     }     km += km / 10;   day++;   }  printf("< 200km in %d day", day);   printf("\n");   system("pause");   return 0; }

s: =5;

k: =s+10=5+10=15;

k: =s+k=5+15=20;

s: =2*k=2*20=40;

ответ: б)40