Написать программу для нахождения "пифагоровых"троек.Воспользовавшись методом перебора,который реализуется через вложенный цикл

Знания

Информатика

1 ответ:

alexxx773 года назад

0 0

Программа на языке Паскаль.

Читайте также

Помогите пожалуйста) заполнить массив из 10 элементов случайными числами в интервале [-10, 10] и подсчитать сумму всех отрицател

VavaM

Var
a: array [1..10] of integer;
i, s: integer;
begin
for i:=1 to 10 do
begin
a[i]:=random(21)-10;
writeln('a[', i, '] = ', a[i]);
if a[i]<0 then s:=s+a[i];
end;
writeln('Сумма всех отрицательных элементов:', s);
end.

0 0

3 года назад

Pascal ABC.Ввести двузначное число, определить равняется ли его сумма пяти.

Пыщпыщ [6]

Var n:integer;
begin
readln(n);
if ((n div 10)+ (n mod 10) )=5 then
writeln('Сумма равно 5')
else writeln('Сумма не равна 5');
end.

0 0

4 года назад

Прошу помогите! Задание в прикрепленном файле

kallenbella10 [14]

Условия на Паскале прилагаются.

0 0

4 года назад

Сколько символов в тексте, если мощность алфавита – 64 символа, а объем информации, содержащийся в нем – 3 Кбайта?

adrianochka

Объяснение:

i = log2(64) = 6 бит

3 Кбайт = 3072 байт = 24576 бит

24576 ÷ 6 = 4096 символов

0 0

4 года назад

Решите пожалуйста 6.7.8

SoulShepard [105]

6. в формуле используется относительная адресация, поэтому в B3 была формула =C4*5
7. опять относительная адресация, значит в B4 была формула =C3-11
8. смешанная адресация (при копировании формулы меняется имя столбца, а номер строки остается без изменения). Формула в Ячейке B2: =D$4+4

0 0

4 года назад