помогите решить задачки 8 класс по информатике!решаются они через турбо Паскаль. 1)Отыскать

помогите решить задачки 8 класс по информатике!решаются они через турбо Паскаль.

1)Отыскать колличество нечетных делителей естественного числа,великих К(К вводятся с клавиатуры).

2)Найдите все естественные числа х,у,z из промежутка от 1 до 20,для которых выполняется равенство : ху(квадрат)=z(квадрат)

Безотлагательно НАДОО ПОМОГИТЕ!

Задать свой вопрос
1 ответ

var s:integer;
i,k:longint;
begin
readln(k);
i:=3;
while ilt;k-1 do begin
i:=i+2;
if k div i=k/i then inc(s);
end;
writeln(s,' delitelei');
end.

 

var i,j:integer;

begin

for i:=1 to 20 do

for j:=1 to 20 do

if sqr(j)*ilt;20 then writeln('x=', i,' y=', j,' z=', sqr(j)*i);

end.

, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы
Анна хорошо учится у неё много подруг свободное от учёбы время

Обществознание.

10) Килограмм конфет дороже килограмма печенья на 52 р. За 8

Математика.

Во сколько раз число атомов кислорода в земной коре больше числа

Химия.

Составить монолог от имени дневника двоечника 7-10 предложений

Русский язык.

Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо

Разные вопросы.

Арабы входят в __________________ групп народов. Местом расселения арабов с незапамятных

Разные вопросы.

Грузовой автомобиль марки краз за одну поездку может доставить 7.500 кирпичей

Математика.

Определить предложения какие они по цели высказывания и по интонации

Русский язык.

"Три толстяка" Называли эту площадь Площадью Звезды последующей причине.

Русский язык.

на одной грядке коротышки посадили 3 ряда морковок по 8 штук

Разные вопросы.

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт