Верно ли что первая цифра числа не превышает m.

@Randy Rock · Регистрация: 04.12.2010

Студворк — интернет-сервис помощи студентам

а то зачет не поставят((( помогите решить пожалуйста
хоть что нибудь:

1)все клетки шахматной доски пронумерованы от 1 до 64, так что 1я строка клеток имеет номера от 1 до 8, вторая от 9 до 16 и т.д. Написать программу, которая на ввод номера клетки выводит номера всех клеток, имеющих с ней общую сторону.

2)дано натуральное число. верно ли следующее:его первая цифра не превышает m.

3)каждая буква замещает некоторую десятичную цифру от 0 до 9. расшифруйте равенство и найдите наименьшую и наибольшую СКО*Р=ОСТЬ.

@andrei63 · 04.12.2010, 11:44

Не по теме:

назвал тему конечно хорошо. Читай правила форума

@Randy Rock · 04.12.2010, 13:24 **[ТС]**

извините за название но как его изменить не знаю. удалить тему тож не получается

@patricksmirnov · 04.12.2010, 13:43

2

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
uses crt;
var
a,i,m,k:integer;
Begin
write('a=');readln(a);
write('m=');readln(m);
Repeat
k:=a mod 10;
a:=a div 10;
Until a=0;
 
if k<m then writeln('не превышает')
else
writeln('превышает');
End.

@Randy Rock · 04.12.2010, 13:45 **[ТС]**

patricksmirnov- благодарю

@patricksmirnov · 04.12.2010, 15:47

для этого кнопка есть

@Randy Rock · 04.12.2010, 15:56 **[ТС]**

у меня она не отображается(

@Puporev · 04.12.2010, 16:19

Сообщение от Randy Rock

у меня она не отображается(

Зато у patricksmirnov, отображается, а то ты типа себе спасибо сказать хочешь.

@Randy Rock · 04.12.2010, 18:53 **[ТС]**

да я ток сегодня зарегистрировался. не в курсе еще. а кнопки "правка" серьезно нет(

@Puporev · 04.12.2010, 19:51

Сообщение от Randy Rock

а кнопки "правка" серьезно нет(

Вообще-то речь шла о кнопке Спасибо...

Сообщение от Randy Rock

patricksmirnov- благодарю

Сообщение от patricksmirnov

для этого кнопка есть

@Randy Rock · 10.12.2010, 17:42 **[ТС]**

1

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
program chess;
uses crt;
 var
 i:byte;
 begin
 clrscr;
 repeat
 writeln('Введите номер клетки');
 readln(i);
 until (i>=1) and (i<=64);
    case i of
    1:writeln('2,9');
    8:writeln('7,16');
    57:writeln('49,58');
    64:writeln('63,58');
    2..7:writeln(i-1,',',i+1,',',i+8);
    58..63:writeln(i-8,',',i-1,',',i+1);
    9,17,25,33,41,49:writeln(i-8,',',i+1,',',i+8);
    16,24,32,40,48,56:writeln(i-8,',',i+1,',',i+8);
    else writeln(i-8,',',i-1,',',i+1,',',i+8);
    end;
    readln
    end.

Новые блоги и статьи Все статьи Все блоги /
Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .	SDL3 для Web (WebAssembly): Сборка SDL3 и Box2D из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .	SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .	И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»

@Randy Rock 0 / 0 / 0 Регистрация: 04.12.2010 Сообщений: 7

	Верно ли что первая цифра числа не превышает m. 04.12.2010, 11:31. Показов 1849. Ответов 10 Метки нет (Все метки) а то зачет не поставят((( помогите решить пожалуйста хоть что нибудь: 1)все клетки шахматной доски пронумерованы от 1 до 64, так что 1я строка клеток имеет номера от 1 до 8, вторая от 9 до 16 и т.д. Написать программу, которая на ввод номера клетки выводит номера всех клеток, имеющих с ней общую сторону. 2)дано натуральное число. верно ли следующее:его первая цифра не превышает m. 3)каждая буква замещает некоторую десятичную цифру от 0 до 9. расшифруйте равенство и найдите наименьшую и наибольшую СКО*Р=ОСТЬ. 0

@andrei63
	04.12.2010, 11:44
	Не по теме: назвал тему конечно хорошо. Читай правила форума 1

@Randy Rock 0 / 0 / 0 Регистрация: 04.12.2010 Сообщений: 7
	04.12.2010, 13:24 [ТС]
	извините за название но как его изменить не знаю. удалить тему тож не получается 0

@Randy Rock 0 / 0 / 0 Регистрация: 04.12.2010 Сообщений: 7
	04.12.2010, 13:45 [ТС]
	patricksmirnov- благодарю 0

@patricksmirnov 76 / 76 / 51 Регистрация: 28.02.2010 Сообщений: 159
	04.12.2010, 15:47
	для этого кнопка есть 1

@Randy Rock 0 / 0 / 0 Регистрация: 04.12.2010 Сообщений: 7
	04.12.2010, 15:56 [ТС]
	у меня она не отображается( 0

@Randy Rock 0 / 0 / 0 Регистрация: 04.12.2010 Сообщений: 7
	04.12.2010, 18:53 [ТС]
	да я ток сегодня зарегистрировался. не в курсе еще. а кнопки "правка" серьезно нет( 0