Var a: array[1..10]of longint; n,m,k,i,l: longint; begin k: =maxlongint; for i: =1 to 3 do read(a[i]); for i: =1 to 3 do if (a[i]> 0) and (a[i]< k) then k: =a[i]; writeln(k); readln; end.
Спасибо
Ответ дал: Гость
первым человеком, если доверять , кому все таки удалось расшифровать египетские иероглифы, был французский ученый египтолог жан-франсуа шампольон (1790-1832гг). он постарался составить полный список иероглифов (доступных и понятых им на те времена) и их греческих эквивалентов, создав таким образом основу для перевода всех остальных египетских иероглифических текстов.
Ответ дал: Гость
из пяти литровой переливаем в трех литровую получаем два литра сливаем их в ведро повтаряем процедуру получаем в ведре четыре литра
Популярные вопросы