Решить 8 класс по информатике! решаются они через турбо паскаль. 1)найти колличество нечетных делителей натурального числа,больших к(к вводятся с клавиатуры). 2)найдите все натуральные числа х,у,z из интервала от 1 до 20,для которых выполняется равенство : ху(квадрат)=z(квадрат) надоо !
olyacuznet5ova
3
19.03.2019 23:30
0
Другие вопросы по теме Информатика
valeriya2812
07.08.2019 12:30
Keks5478568
07.08.2019 12:30
Simpson011
01.03.2021 09:37
Каркушааа
01.03.2021 09:37
leski
01.03.2021 09:35
aisharamazanovaАйша
01.03.2021 09:34
LikiMikhoelis
16.02.2021 09:17
Zmei0907
16.02.2021 09:16
Популярные вопросы
- Площади двух подобных треугольников относятся как 9: 49 периметр меньшего...
3 - Вэтом морозном дне всплывает солнце найти грамматическую основу...
3 - Реши с объяснением: 128: 32 129: 43 212: 53 230: 46 476: 68 147: 21 168:...
2 - Что общее есть у ужа,воробья и пчелы?...
1 - Сколько сторон у многоугольника с тем же периметром и равными сторонами,...
2 - Запиши выражения и вычисли их значения.разность чисел 44 и 34 увеличить...
2 - Указать порядковый номер элемента, у которого: а) заканчивается заполнение...
3 - Подобрать общеупотребительный синоним к слову проездиться...
3 - Двузначное число, у которого сумма и разность числа десятков и числа единиц...
1 - На расстоянии 20 см от центра шара проведено сечение.определите его площадь...
3
var s:integer;
i,k:longint;
begin
readln(k);
i:=3;
while i<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)*i<20 then writeln('x=', i,' y=', j,' z=', sqr(j)*i);
end.