М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
ОМЛА
ОМЛА
11.02.2021 10:32 •  Информатика

составить блок-схему и написать программу : сформировать массив из 10 чисел все положительные числа переписать в другой массив

👇
Открыть все ответы
Ответ:
ctc76
ctc76
11.02.2021

ответ:var

   n, i: word;

   sum: real;

 

begin

 

   write ('n = '); readln (n);

 

   sum := 0;

 

   for i := 1 to n do

       sum := sum + 1/(i*i);

 

   writeln (sum:6:5);

 

readln

end.

gene  16/06/2017

a(a-1)(a-2)(a-3)...(a-n)

var  

   a,n,i: integer;

   mult: longint;

begin

   write('Введите a: ');

   readln(a);

   write('Введите n: ');

   readln(n);

   mult := a;

   for i:=1 to n do

       mult := mult * (a - i);

   writeln(mult);

end.

1/a + 1/(a+1)+...+1/(a+n)

var  

   a,n,i: integer;

   sum: real;

begin

   write('Введите a: ');

   readln(a);

   write('Введите n: ');

   readln(n);

   sum := 0;

   for i:=0 to n do

       sum := sum + 1/(a + i);

   writeln(sum:5:2);

end.

Объяснение:

4,6(32 оценок)
Ответ:
Антонggez
Антонggez
11.02.2021
Можно декодировать вручную: надо написать вместо каждой буквы - букву, которая в алфавите стоит перед ней (для буквы а - букву я) - это не сложно, например:
о -> н (в алфавите ...мнопр...)
б -> а (в алфавите ...яабвг...)
и т.д. 
Можно с интернет-калькулятора (гyглить по фразе "шифр Цезаря"): ввести исходную фразу и посмотреть, что получится (сдвиг в шифре равен -1 или, что тоже самое, 32)
Наконец, можно написать программу, которая всё сделает для вас.

В любом случае,
об оёу тфеб оёу = на нет суда нет
лпоёч - еёмф гёоёч = конец - делу венец
4,6(7 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ