первую фигуру мы можем раскрасить в 6 цветов, вторую - в 5, третью- в 4, и т.д. а первую - в 3 цвета
6*5*4*3=360
ответ 360 способов
Ответ дал: Гость
1)
var a, b: integer;
begin readln(a, b); if (a div 10 + a mod 10) > (b div 10 + b mod 10) then writeln('сумма цифр ', a, ' больше') else writeln('сумма цифр ', b, ' больше'); end.
2)
var a: integer;
begin readln(a); writeln((a mod 10) * 10 + a div 10); end.
3)
var a: integer;
begin readln(a); if ((a div 100) = (a mod 100) div 10) or ((a div 100) = (a mod 10)) or ((a mod 100) div 10 = (a mod 10)) then writeln('есть 2 одинаковые цифры') else writeln('нет 2-х одинаковых цифр'); end.
Ответ дал: Гость
for i : = 1 to length(s) do
begin
res : = res + s[i];
if i mod 2 = 0 then
res : = res + s[i];
end;
writeln(res);
i : = pos(" ",s); {ищем первый пробел}
delete(s; i; 1); {удаляем первый пробел}
i : = pos(" ",s); {ищем второй пробел, котрый теперь первый}
writeln(s[i-1]); {выдаем знак который находится перед пробелом}
Ответ дал: Гость
виды алгоритмов по способу записи
1)текстовый
2)графический.
виды алгоритмов по последовательности исполнения шагов-команд
Популярные вопросы