Помощь - Поиск - Пользователи - Календарь
Полная версия: паскаль фри,строки
Форум «Всё о Паскале» > Современный Паскаль и другие языки > Ада и другие языки
masha
Код
Program My;  var  s:string;  i,n,m:integer;  begin  write('vvedite stroky: ');  readln(s);  n:=length(s);  for i:=1 to n do  if(n mod 2)=1 then write(s[i][(n div 2)+1]);


Помогите пожалуйста
sheka
Ни задания, ни текста не видно. Отредактируй.
TarasBer
Форматирование жжот
КГ/АМ
Krjuger
Ну если востановить то,что в заголовке и то, что написано,то Надо N строк и надо напичатать все четные символы)))
Конешно же код делает совершенно не то.)))Он даже не откомпилируеться,так как в конце нету end. В общем ждем человека,чтобы понять,что именно он хочет.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.