Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
для 4 символов:
2*2*2*2=16
для 5 символов:
2*2*2*2*2=32
для 6 символов:
2*2*2*2*2*2=64
16+32+64=112
1)
s : = 0;
for i : = 1 to k do
begin
if i mod 2 < > 0 then
s: = s + i;
end;
2)
for i : = 5 to 55 do
writeln(i);
3)
s : = 1;
for i : = n to m do
s: = s * i;
4)
for i : = 10 to 15 do
обрамления там везде одинаковые
var a, b, c: integer;
write('a='); readln(a);
write('b='); readln(b);
write('c='); readln(c);
if a < b then if a < c then writeln(a, ' - меньшее') else writeln(c, ' - меньшее') else if b < c then writeln(b, ' - меньшее') else writeln(c, ' - меньшее'); end.
var x,i,x1,x2,x3: integer
s: string;
read(x);
s: =str(x);
x1: =int(s[1]);
x2: =int(s[2]);
x3: =int(s[3]);
if (x1+x3)mod x2=0 then writeln("да")
else writeln("нет");
end.
Популярные вопросы