Составьте программу, которая позволяет переставить местами cлова строки s. строка s , состоящая из двух слов,

Question

Информатика: Составьте программу, которая позволяет переставить местами cлова строки s. строка s , состоящая из двух слов, разделённых пробелом, вводится с клавиатуры.

lЕвгешкаl · Answer

Program Pr1;uses crt;var stroka,tmp:string; i:integer;Beginclrscr;readln(stroka);for i:=1 to length(stroka) do if stroka[i]= then tmp:=copy(stroka,1,i-1);delete(stroka,1,length(tmp)+1);stroka:=stroka+ +tmp;writeln(stroka);end....

Составьте программу, которая позволяет переставить местами cлова строки s. строка s , состоящая из двух слов, разделённых пробелом, вводится с клавиатуры.

Популярные вопросы