перевести с паскаля на C++ Builder |
22.02.2010, 21:11
|
|
Новичок
Регистрация: 22.02.2010
Сообщений: 1
С нами:
8534980
Репутация:
0
|
|
перевести с паскаля на C++ Builder
дано целое k от 1 до 180 определить какое цифранаходиться в к-й позиции последовательности
10111213....9899 в которой выписанны подряд все днузначные цифры.
Код:
uses crt; var k,c:byte; begin clrscr; repeat {вводим число к с проверкой правильности ввода} write('Vvedite k=[1,180] k='); readln(k); until (k>=1)and(k<=180); if odd(k) then c:=k div 20+1 {если к-нечетное} else if k mod 20=0 then c:=9 else{если четное и кратно 20} c:=k mod 20 div 2 -1; {четное и не кратно 20} write('Cifra #',k,'=',c); readln end.
|
|
|
23.02.2010, 22:47
|
|
Участник форума
Регистрация: 29.07.2008
Сообщений: 128
С нами:
9360320
Репутация:
34
|
|
Открой любой справочник по си и переведи,в чем проблема?Div В си это /,Mod-%.And-&.Прежде чем сюда писать книжку попробуй открыть.
|
|
|
|
|
 |
Похожие темы
|
| Тема |
Автор |
Раздел |
Ответов |
Последнее сообщение |
|
С помощью чего перевести деньги с мобильника на WebMoney
|
NightStorm™ |
Электроника и Фрикинг |
5 |
16.09.2009 03:18 |
|
Embarcadero: C++ Builder 2009
|
Kollinz |
С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby |
1 |
11.08.2009 11:27 |
|
[Статья] Создание расширения для Windows Explorer при помощи C++ Builder
|
Dobby007 |
С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby |
2 |
29.03.2009 08:58 |
|
Помогите перевести прогу с паскаля в С++
|
WeReWoLf777 |
С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby |
6 |
24.03.2009 21:55 |
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Комбинированный вид
