бірінші жолда 10, 16; төртінші жолда 18,4,0; бесінші жолда 11,4,6, (әрі қарай білмеймін)
Ну примерно так. Пусть в алфавите N различных букв. Тогда 3х буквенных комбинаций, с учетом того, что буквы могут использоваться в любых сочетаниях, можно составить:
N*N*N=N³
У нас 216 слов, т.е.
N³=216
Отсюда
Program v;
Var a,b:integer;
BEGIN
readln (a);
readln (b);
if (a > b) then writeln (a)
else
begin
writeln (a);
writeln (b);
end;
END.
3) максимум из введенных 10 чисел, больших 30000 и делящихся на 5
4) если в конце заголовка цикла поставить ';' , то будет выведено следующее:
если последнее, 10 число больше нуля и делится на 5 , то будет выведено это число, иначе 0
5) будет выведено последнее введенное число
6) заменить строку max = 0 на min = 300000 ( или Int.Min ?)
заменить строку if ((a>max)&(a % 5 == 0)) на строку
if ((a<min) & (a % 2) == 0))
заменить строку max=a на min = a
изменить строку Console.Writeln(max) на Console.Writeln(min)