tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Для заданного натурального
Для заданного натурального числа n написать программу вычисления выражения s=√1+√2+√3+√4++√n подстановка i=1..n,s=0,s=s+√i
Kraddy14
3 30.07.2019 23:50
0
Ответы
DarkBlood210
03.10.2020 18:17
Uses Crt;
var
i,n : integer;
S:Real;
Begin
ClrScr;
Write('Input N: ');
ReadLn(n);
s:=0;
for i:=1 to n do
s:=s+Sqrt(i);
Write(S);
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
виктория2003141
08.04.2020 17:56
программирование, 10 класс,информатика Задание на скрине...
киса822
08.04.2020 17:58
Сколько бит памяти компьютера займет слово ЦВЕТЫ в кодировке КОИ8-Р?...
violali83
19.07.2019 09:40
Чем отличается графическая модель от реального объекта...
dasha00200100
19.07.2019 09:40
Правильно или нет, подскажите как program ex; var a,b,c: integer; begin readln (a); b: =a mod 10; c: =a div 100; a: =b+c; writeln (a); end....
anastasia1292
02.05.2020 06:19
Если компьютеры не объединены в сеть, то как они могут обменниваться информацией?...
kazorinJeka
02.05.2020 06:16
Рассчитайте объем двухминутного фильма на экране монитора с разрешением 1024 × 768, палитрой из 65536 цветов и частотой смены кадров 32 кадра в секунду....
dimon5434
02.05.2020 05:59
Що таке електронний документообіг...
Kapusto4ga
02.05.2020 05:40
Создайте веб-страницу под названием Моя семья использование различных теги форматирования добавьте в ней рисунок домик Ёлка и так далее...
svetamalova1876
02.05.2020 05:37
1. Какие операторы используются при программировании линейных алгоритмов? 2. Какие операторы используются при программировании разветвляющих алгоритмов? 3. Какие...
elenavalkova92
26.05.2019 22:40
)вычислите информационный обьём текстового документа в мбайт (с точности до сотых) и узнать, сколько дискет 3,5 дюйма обьёма 1.44 мбайт понадобится для переноса...
Популярные вопросы
У народі здавна шанувалося почуття любові до батьківрозібрати...
2
Если сделать это то файлы в диске Д удалятся?...
2
( Мцыри) относят к вольнолюбивым произведениям Лермонтова. Впомните...
2
СДЕЛАТЬ СОЧИНЕНИЕ РАССУЖДЕНИЕ 7 КЛАСС, ВОТ ФОТО:...
2
Тех мех если кто шарит по-братски)...
2
Через точку О перетину діагоналей квадрата зі стороною а проведено...
3
УМОЛЯЮЮЮЮ МНЕ ОЧЕНЬ НУЖНО МНЕ .Я НЕ УСПЕВАЮ СДАТЬ РАБОТУ...
3
В правильной треугольной пирамиде DABC на ребре АВ отмечена...
3
Газ у балоні нагрівають від 250К до 400К. Тиск зростає на 0,2МПа....
1
Фрагмент одной из цепей ДНК имеет следующую последовательность...
3
var
i,n : integer;
S:Real;
Begin
ClrScr;
Write('Input N: ');
ReadLn(n);
s:=0;
for i:=1 to n do
s:=s+Sqrt(i);
Write(S);
End.