program ostatok; var c: integer; beginwriteln('введите число с.'); readln(c); writeln('остаток от деления ',c,' на 10, возведенный в квадрат, равен ',sqr(c mod 10)); end.
Ответ дал: Гость
program e8;
var a, b, c, v: real;
begin
writeln('введите значения длины, ширины,высоты');
readln(a,b,c);
v: =a*b*c;
writeln('v=', v: 4: 2);
readln;
end.
Ответ дал: Гость
var i: integer;
begin
for i: =1 to 1000 do
if i mod 2 = 1 then writeln(i*i*i);
end.
Ответ дал: Гость
это просто название месяцев, а вот май, август, октябрь, декабрь в этих месяцах по 31 дню, если в учитесь по босовой , то ответить нужно именно так
Популярные вопросы