|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
08.12.2019, 16:39 | #1 |
Новичок
Джуниор
Регистрация: 08.12.2019
Сообщений: 1
|
Перевести код из Pascal в C
Так как в нашем универе решили преподавать на 1 курсе Си, а я в нём дуб дубом, то пожалуйста, помогите перевести этот код в Си
Задача:Проверить явяются ли два слова обращенными друг к другу, то есть первое читается слева на право, так же как второе справа на лево var s1,s2:string; n,i,k:byte; begin write('Введите первое слово: '); read(s1); write('Введите второе слово: '); read(s2); if length(s1)<>length(s2) then write('Нет') else begin n:=length(s1); k:=0; i:=1; while(i<=n)and(k=0) do if s1[i]<>s2[n-i+1] then k:=1 else i:=i+1; if k=0 then write('Да') else write('Нет') end end. |
08.12.2019, 17:33 | #2 |
C/C++, Java
Участник клуба
Регистрация: 28.03.2012
Сообщений: 1,679
|
"Keep it simple" - придерживайтесь простоты!
Уильям Оккам - "Не следует множить сущее без необходимости" Сложность - враг простоты и удобства! |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Перевести с Pascal на C++ | surof1n | Помощь студентам | 1 | 24.09.2015 23:12 |
Перевести код из Pascal в C++ | Lodbrock | Помощь студентам | 4 | 21.05.2014 13:08 |
Перевести на С++ (Pascal) | spinogryz_ua | Помощь студентам | 4 | 23.11.2012 12:04 |
Перевести код с Pascal на C++ | Aaaaaa111 | Помощь студентам | 1 | 22.02.2012 14:28 |
перевести код с Pascal на C++ | panic_a | Помощь студентам | 2 | 22.12.2010 00:37 |