tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Паскаль вычислите значение
Паскаль вычислите значение переменной "y" при заданном значении "n"
frashthefrash
3 27.07.2019 00:20
1
Ответы
Яхшибой
25.09.2020 07:39
Var
i,n:integer;
y:real;
begin
write('Введите n=');read(n);
y:=0;
for i:=1 to n do
y:=y+1/i;
write('Сумма=',y);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ilshat22
15.12.2020 14:51
Базовим елементом якого виду графіки є трикутник?...
trofimka31
15.12.2020 14:51
нужно, 9 класс информатика ...
jookyun
15.12.2020 14:51
Нарисуйте схему графа G:=(4,3)...
Mihrimah1
15.12.2020 14:51
Изучи изображения и определи тип заливки...
kurzaevaelenka
15.12.2020 14:51
Задание на Логику по информатике класс...
MariyaKokhonova
08.10.2019 08:31
Составить программу определяющую лежит ли точка с заданными координатами (х,у) в заштрихованной области паскаль...
DENCHIK23371
08.10.2019 08:30
Выражение: ( х - у ) - у...
gulya19860630
08.10.2019 08:30
Найдите мне тест по информатике в первом вопросе тебе таблицу и снизу слова тебе надо правильно поставить во втором вопросе тебе нужно выбрать лишнее в третьем нужно соотнести:...
aadiiii1
08.10.2019 08:30
30 : p составить таблицу квадратов чисел от 1 до 10(используя цикл с условием)...
KOROTKOVAKATA
08.10.2019 08:30
Pascal.определить h - полное количество часов и m - полное количество минут от начала суток до того момента (в первой половине дня), когда часовая стрелка повернулась на f градусов...
Популярные вопросы
Исключение гонять,а если гонит? гонит-это исключение? дышит-исключение?...
3
Нужно написать сочинение - рассуждение на тему: слова состояния!...
3
Вот условия: в каждый аквариум налили 1 литр воды. как ты думаешь, в какой аквариум...
2
Что было восстановлено в архангельске после войны?...
1
Решать,,ловить,шить,бегаю, и время как будет?...
1
Дано некоторое число,обозначьте его какой-нибудь буквой и запишите в виде буквенного...
2
На какой стадии развития человек стал отличатся от животных. ответ обоснуйте....
2
Мне нужно 20 качественных слов из текста тимур и его команда....
2
Найдите 17,5% от числа х,если 35% от 40% числа х равняются 28...
3
Много . докажите тождество (a+b)^2-2ab+a^2-b^2=a*2а...
3
i,n:integer;
y:real;
begin
write('Введите n=');read(n);
y:=0;
for i:=1 to n do
y:=y+1/i;
write('Сумма=',y);
end.