Условие: Вычислить сумму ряда
s=(1+1/1) + (1+1/ 2) +....+ (1+1/n)");
Цель занятия: Изучить структуру программ, основные операторы С#.NET для. вычисления суммы ряда. Получить навыки работ по составлению простейших программ для вычисления суммы ряда в консольном варианте.
Структурный метод
using System.Linq;
using System.Text;
namespace ConsoleApplication1
{
class Program
{
static void Main(string[] args)
{
string str;
Console.WriteLine("\n\n\n\n\n\n\n\n " + " Программа сумма ряда");
Console.WriteLine( " Вычислить сумму ряда s=(1+1/1) + (1+1/ 2) +....+ (1+1/n)");
Console.WriteLine(" \n Выполнил Никишев ");
Console.ReadKey();
Console.ReadLine();
Console.Clear();
Console.WriteLine("Введите число n.");
int n = int.Parse(Console.ReadLine());
// Console.WriteLine("Вы ввели: " + a);
// Console.WriteLine("Введите число b.");
// int b = int.Parse(Console.ReadLine());
// Console.WriteLine("Вы ввели: " + b);
// int c=a+b;
// Console.WriteLine("результат с=: " + c);
double s=0;
for(int i=1;i<=n;i++)
{
double a=(1+1/Math.Pow(i,i));
s = s + a;
}
Console.WriteLine("результат S=: " + s);
//Console.WriteLine("результат s=: {0:F9}" , s.ToString ());
Console.WriteLine("\n нажми Enter для выхода из программы");
str = Console.ReadLine();
Console.ReadKey();
//Console.ReadLine();
}
}
}
Программа на языке С++
#include "stdafx.h"
#include "iostream"
#include <conio.h>
#include <string.h>
#include <stdio.h>
#include <stdlib.h>
|
|
|
using namespace std;
char newline;
int _tmain(int argc, _TCHAR* argv[])
{
system("cls");
setlocale(LC_CTYPE,"Russian");//Перевод на русский язык
cout<<"\n\n\n\n\n\n\n\n\t\t Лабораторная работа по программированию";
cout<<"\n\n\n\n\n\n\n\n\t\t Тема: Вычисление суммы ряда";
cout<<"\n\n\n\n\t\t\t\t\t Выполнил :";
cout<<"\n\t\t\t\t\t профессор кафедры компьютерных технологий";
cout<<"\n\t\t\t\t\t Никишев Вячеслав Константинович"<<"\n\n\n\n\n\n\n"<<endl;//<<endl;
system("pause");
system("cls");
cout<<"\n\n Условие:" << endl;
cout<< "Вычислить сумму s=(1+1/1) + (1+1/ 2) +....+ (1+1/n)";
"<<"\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n"<<endl;
system("pause");
system("cls");
char t;
int k,i;
double s,p;
cout<<"Введите количество членов ряда\n";
cin>>k;
do
{
t=0;
s=0;
system("cls");
for (int i=1;i<k;i++)
{
s=s+(1+p/i);
}
cout<<"s="<< s<<endl;
cout<<"\n";
getch();
cout<<"\n";
cout<<"Повторить? (y/n) ";
cin>>t;
system("cls");
}
while (t=='y');
}
Лабораторная работа №2
Тема: Вычисление суммы ряда.
Консольный вариант
Цель занятия: Изучить структуру программ , основные операторы VB.NET для вычислений, отличительные признаки языка программирования VB и VB.NET. Получить навыки работ по составлению простейших программ для вычисления суммы ряда в консольном варианте.
|
|
|
1. построение словесных алгоритмов
2. Построение алгоритмов в виде блок-схем
3. Разработка программы в консольном варианте .
4.Разработка программ на основе основных математических операторов
Словесный алгоритм:
1. Титульный лист ( тема, условие задачи, автор,кнопка Начало);
2. Если кнопка Начало включена, то переход на 3, иначе на 1;
3. Ввод n ( текстовое окно);
4. Организация цикла от i=1 до n;
5. Вычисление a=(-1) ^ (i + 1) / (i * (i + 1))
6.Вычислить выражение s=s+a
7. Если i>n, то переход на 8, иначе на 5
8. Вывод результата вычисления s
Module Module1
Dim x, k As Integer
Dim s As Double
Dim str As String
Sub Main()
Dim k As Integer
Console.WriteLine()
Console.WriteLine(« ГОУ ВПО ЧГПУ им. И. Я. Яковлева»)
Console.WriteLine()
Console.WriteLine()
Console.WriteLine(« Лабораторная работа по программированию «)
Console.WriteLine(« на тему “Вычисление суммы ряда”»)
Console.WriteLine()
Console.WriteLine()
Console.WriteLine(« Выполнил: студент МиИ-3а Сергеев Н. И.»)
Console.WriteLine(« Проверил: профессор информатики Никишев В. К.»)
Console.WriteLine()
Console.WriteLine()
Console.WriteLine()
Console.WriteLine()
Console.WriteLine(« Нажмите любую клавишу»)
Console.ReadKey()
Console.Clear()
|
|
|
str = «g»
s = 1
Do Until str = «»
Console.Clear()
Console.WriteLine(«Введите число “n”»)
x = Console.ReadLine()
For k = 1 To x
s = s * (1 + 1 / Math.Pow(k, x))
Next
Console.WriteLine(s)
Console.WriteLine()
Console.WriteLine(«повторить?(нажмите клавишу)»)
str = Console.ReadLine()
Loop
End Sub
End Module
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
namespace WindowsFormsApplication23
{
public partial class Form3 : Form
{
public Form3()
{
InitializeComponent();
}
// Кнопка задание 1
private void button1_Click(object sender, EventArgs e)
{
int n = Convert.ToInt16(textBox1.Text);
double s=0;
for(int i=1;i<=n;i++)
{
double a=(1+1/Math.Pow(i,i));
s = s + a;
}
textBox2.Text = Convert.ToString(s);
}
private void button2_Click(object sender, EventArgs e)
{
Form1 f1 = new Form1();
Form3.ActiveForm.Hide();
f1.Show();
}
}
}
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
namespace WindowsFormsApplication23
{
public partial class Form6 : Form
{
public Form6()
{
InitializeComponent();
}
// Кнопка вычислить
private void button1_Click(object sender, EventArgs e)
{
double x = Convert.ToDouble(textBox1.Text);
double eps = Convert.ToDouble(textBox2.Text);
|
|
|
int n = 0;
double a = Math.Pow(-1, n + 1) * Math.Pow(x, 2 * n + 1) / (2 * n + 1);
double s = 0;
while (Math.Abs(a) >= eps)
{
n = n + 1;
a = Math.Pow(-1, n + 1) * Math.Pow(x, 2 * n + 1) / (2 * n + 1);
s = s + a;
}
textBox3.Text = Convert.ToString(s);
textBox4.Text = Convert.ToString(n);
}
// Кнопка возврат
private void button2_Click(object sender, EventArgs e)
{
Form1 f1 = new Form1();
Form6.ActiveForm.Hide();
f1.Show();
}
}
}
Программа в среде VC++.NET
#pragma endregion
private: System::Void button2_Click(System::Object^ sender, System::EventArgs^ e) {
}
private: System::Void button1_Click(System::Object^ sender, System::EventArgs^ e) {
}
private: System::Void button2_Click_1(System::Object^ sender, System::EventArgs^ e) {
this->Close();
}
private: System::Void button1_Click_1(System::Object^ sender, System::EventArgs^ e) {
int n = Convert::ToInt32(textBox1->Text);
double s=0;
int i;
double r,p;
p=1;
for(int i=1;i<=n;i++)
{
r=1+p/i;
s=s+r;
}
//label2->Text = Convert::ToString(cal->z);
label2->Text = Convert::ToString(r);
textBox3->Text = Convert::ToString(s);
}};}
Программа на VB.NET
Public Class Form4
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Form5.Show()
Me.Hide()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Form1.Show()
Me.Hide()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim i, n As Integer, p, s As Single
n = Val(TextBox1.Text)
p = 1 : s = 0
For i = 1 To n
s = s + Math.Sin(i)
p = p * (i / s)
Next
TextBox2.Text = p
End Sub
End Class
Public Class Form5
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim s, p, t As Single, n As Integer
s = 0
n = 1
t = Val(TextBox1.Text)
p = Math.Pow(-1, n) / Math.Pow(n, 2)
s = s + p
Do Until Math.Abs(p) < t
n = n + 1
p = Math.Pow(-1, n) / Math.Pow(n, 2)
s = s + p
Loop
TextBox2.Text = Str(s)
TextBox3.Text = Str(n)
TextBox4.Text = Str(Math.Abs(s - Math.Pow(Math.PI, 2) / 12))
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Form1.Show()
Me.Hide()
End Sub
End Class
Задания к теме Сумма ряда
Лабораторная работа №3
Дата добавления: 2018-02-18; просмотров: 940; Мы поможем в написании вашей работы! |
Мы поможем в написании ваших работ!