heodbxbbshe
?>

Для заданного числа n составьте программу вычисления суммы s=1+1/2+1/3+1/4+…+1/n, где n – натуральное число. . и на ( алг. начало.

Информатика

Ответы

marinamarinyuk39
алг нач цел i; вещ S S := 0 ввод i нц для i от 1 до i S := S + 1/i кц вывод "S = ", S  кон
Yuliya1693

Ну, если я правильно понял суть задания, то:

osh - кол-во ошибок, oc - осценка. Соль программы в том, что учитель вбивает количество ошибок, и ему выдается оценка, которую надо поставить. Что-бы программа работала, создашеь кнопку на форме, жмешь по ней два раза в VB, появится окно для ввода кода программы, туда пишешь вот эту команду:   Ocenka()

Потом после этой команды находишь строчку End Sub, она будет перед End Class, и копируешь вот этот код:

 

Sub Ocenka()
Dim osh, oc As Byte
osh = InputBox("Введите количество ошибок")
If osh = 0 Then
oc = 5
ElseIf osh = 1 Then
oc = 4
ElseIf osh = 2 Then
oc = 3
ElseIf osh >= 3 Then
oc = 2
End If
MsgBox("Оценка ученика - " & oc)
End Sub

 

Ну впринципе все) Скрин програмки прилагается)


Построение алгоритма и его реализация в среде visual basic для следующей : ученик выполнил работу. в
Nadezhda
Тут, во-первых, не понятно о каких именно таблицах идет речь

Для таблиц баз данных: Строка(несколько вариантов), целое(несколько вариант), с плавающей запятой (несколько вариантов), логичесого типа, дата, датавремя, время и двоичные данные или blob

Для электронных таблиц типа Excel: строка, ссылка, гиперссылка, целое число, дробное число, проценты, денежные единицы, дата, дата-время, время, формула. Так же ячейка может содержать дополнительные данные типа личного имени, комментария, форматирование, цвет фона и тд

2) междустрочный интервал, отступы (верх, низ, право, лево), отступ первой строки, выравнивание

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Для заданного числа n составьте программу вычисления суммы s=1+1/2+1/3+1/4+…+1/n, где n – натуральное число. . и на ( алг. начало.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

matveevaev81
Merkuloff78
Никитина580
Pastel-sova
NikolayGoncharov
Olesya
AnvarzhonovichNadezhda1071
abdulhakovalily22
Екатерина1979
evolkova-73
svetasvetlana429
kirieskamod262
Юлия-Ольга1313
Feyruz90
rudakovam198