Вы хоть пишите, как нужно это проверить....то ли это алгоритм проверки на каком либо языке, то ли еще что-то. Чем точнее вы задаете ответы, тем быстрее на них отвечают.
Var
name : string;
city : string;
begin
writeln("Привет! Меня зовут Электроша. А тебя?");
readln(name);
writeln("Приятно с тобой, "+name+" познакомиться. А давай поиграем в города. Назови столицу Франции.");
readln(city);
if(city = "Париж") then writeln("Ты хорошо играешь.")
else writeln("Ты ошибся!");
readln();
end.
ЦВЕТОПЕРЕДАЧА
Ц В Е
ТОПОР =》 ТОП
ДЕРЕВО =》 ОВЕРЕД =》ЕРЕД
ВРАЧ =》 АЧ
А
Если предметы, цифры или буквы изображены один в другом, то их названия читаются с добавлением предлога "в" (перед или между названий).
Если справа (сверху) от рисунка стоят перевёрнутые запятые (одна или несколько), то отбрасываются буквы в конце слова.
Если предмет на рисунке перевернут, то его название читают справа налево.
Если слева (внизу) от рисунка стоят запятые (одна или несколько), то отбрасываются первые буквы слова (по количеству запятых).
Логорифм троичный из 50 = 4 лампочки.
3 бита, (столько нужно для того чтоб записать 1 ширенгу из 8)
// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
begin
var s:=ReadlnString('>');
Writeln(RegEx.Replace(s,'0{2,}','0'))
end.
<u><em>Тестовое решение</em></u>
> 100x100=10000; 10км=10х1000=10000(м)
10x10=10; 10км=10х10=10(м)