program ostatok; var c: integer; beginwriteln('введите число с.'); readln(c); writeln('остаток от деления ',c,' на 10, возведенный в квадрат, равен ',sqr(c mod 10)); end.
Ответ дал: Гость
1) найти убыль как к-во * 12%
2) найти прирост как к-во * 20%
3) к-во = к-во-убыль+прирост
выполнить 8 раз
var
x,a,b: real;
i: integer;
begin
x: =100000;
for i: =1 to 8 do
begin
a: =x*0.12;
b: =x*0.20;
x: =x+b-a;
end;
writeln(x);
end.
Ответ дал: Гость
значит так кролик это 4 лапы + 1 голова 5(ед) , голубь 2 лапы + 1 голова= 5(ед), размещаем сначало во все клетки по голобю + по кролику получается в каждой клетке уже по 8 (ед) остается 3 кролик и 4 голубя 5 елток тоесть еще по одному кролику и в 2 оставшиеся по 2 голобу получается 3 клетки будет по 1 голубю и 2 кролика и 2 клетки с 1 кроликом и 3 голубями проверяем 1*3+2*5=13 и 5*1+3*3=14 тоесть все верное : )
Ответ дал: Гость
1951 г - введен в эксплуатацию первый отечественный компьютер мэсм с хранимой программой, созданный под руководством академика с. а. лебедева.
Популярные вопросы