Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
n = 2^i
n = 2^5 = 32
ответ. в классе 32 ученика
я бы сделал
program p_1; var a,b: real; beginwriteln ('vvedite 1-oe'); read (a); writeln ('vvedite 2-oe'); read (b); if (a> b) thenbegin writeln ( ' 1-oe bolshe (',a,')' ); end; if (a< b) thenbegin writeln ( ' 1-oe menshee. bolshe vtoroe (',b,')' ); end; if a=b thenbegin writeln ('oni ravni'); end; end.
var n, i, k, a: integer;
begin readln(n); k : = 0; for i : = 1 to n do begin readln(a); if trunc(sqrt(a)) * trunc(sqrt(a)) = a then k : = k + 1; end; writeln(k); end.
попробуйте так (turbo pascal):
program 1;
var s: string;
c: integer;
begin
write('vvedite nazvaniye zhivotnogo');
read(s);
writeln('vvedite kolichestvo syedennyh gribov');
readln(c);
writeln(s, ' ', 'syest', ' ', c, ' ', 'gribov');
end.
Популярные вопросы