Задачка для 3-го класса

vott.ru — про орехи и хомяка, с разведопроса с Савватеевым, текст в первом
Новости, Наука | Mafia 20:58 12.04.2019
5 комментариев | 35 за, 1 против |
#1 | 23:29 12.04.2019 | Кому: Ilya.K
Можно не так красиво:

for {set i 0} {$i < 10000} {incr i} {
	set bilo [expr $i*4+1]
	set orehi $bilo
	set err 0
	for {set j 0} {$j < 4} {incr j} {
		set zabrali [expr 1+($orehi-1)/4]
		set orehi [expr $orehi-$zabrali]
		if {[expr ($orehi-1) % 4] != 0 && $j != 3} { 
			set err 1 
			break
		}	
	}
	if {$err} {continue}
	if {[expr $orehi % 4] == 0} {
		puts "Otvet: $bilo"
		break
	}
}

Otvet: 765
#2 | 23:48 12.04.2019 | Кому: Всем
Или обратно:
for {set i 1} {$i < 10000} {incr i} {
	set err 0
	set orehi [expr $i*4]
	for {set j 0} {$j < 4} {incr j} {
		set orehi [expr $orehi+25*$orehi/75]
		if {[expr $orehi %4 ] != 0} {
			set err 1
			break		
		} else {
			set orehi [expr $orehi+1]
		}
	}
	if {$err} {continue} else {
		puts "Otvet $orehi"
		break
	}
}
#3 | 10:07 13.04.2019 | Кому: Mafia
> А вот такая запись (что за язык такой?)

Это Tcl (Tool Command Language). Часто его по работе использую. Запустить можно в терминале командой tclsh.
#4 | 12:16 13.04.2019 | Кому: врач
> Я даже не знаю, что такое терминал.

Грубо говоря, это старая добрая командная строка (cmd.exe в Windows). В Linux, когда ты работаешь в графической оболочке, для доступа к ней используется приложение Terminal. Поэтому это как синонимы.
Пример из коммента №33 я сохранил в файл orehi.tcl, открыл терминал и набрал в нём:
tclsh orehi.tcl
И получил ответ. tclsh -- это интерпретатор языка Tcl (приложение), которое исполнило те команды, которые я написал в tcl-файле.
#5 | 12:23 13.04.2019 | Кому: Sean1s
> А вообще грустно: современные дети вообще неприспособленные к жизни - все ответы очень просто получить, был бы комп под рукой.

Для детей есть отличная бесплатная программа, которая обучает азам программирования. Подойдет даже для дошколят. У кого дети есть попробуйте.
[censored]
Войдите или зарегистрируйтесь чтобы писать комментарии.