motofan logo
       
> 

Нужна помощь в написнаии Visual Basic

Off line
сообщение 6.1.2013, 20:38


Опытный
***

Группа: Пользователи
Сообщений: 107
Регистрация: 16.7.2007
Пользователь №: 141 627
Модель телефона: ROKR E1 + ZN 5
Прошивка: Конфиденциальная ;)


Настроение:
В разработке NEW саунда ;)



Рейтинг: 47.5



Форумчане помогите плз smile.gif знакомый попросил ему помощь, а я в кодинге ни алё
Нужно в Visual Basic :
Создать файл, содержащий сведения о сдаче студентами сессии. Каж-дая запись содержит поля: учебная группа, фамилия студента, оценки по четырем экзаменам (математика, информатика, история, иностранный язык).
Написать программу, в результате выполнения которой выдаются следующие сведения:
- средний балл каждого студента Х;
- средний балл каждого студента;
- фамилия и группа студента с лучшим средним баллом;
- средний балл по математике.
Значение Х вводит пользователь.


и

составить блок схему и программу (алгоритм написать)

Буду очень благодарен ребята smile.gif Всех с рождеством smile.gif

Сообщение отредактировал Off line - 6.1.2013, 21:27
Юзер вышелВ друзьяВизиткаП/Я
К началу страницы
+Ответить
IlluminatI
сообщение 7.1.2013, 13:48


Ветеран
*****

Группа: Пользователи
Сообщений: 670
Регистрация: 15.8.2009
Из: Украина, г.Харьков
Пользователь №: 204 570
Модель телефона: [DROID MAXX][RAZR M]


Настроение:
139



Рейтинг: 520



Off line, в первом приближении (минут 10 посидел) это выглядит как-то так. На вб не умею, но с шарпа на вб перевести вродь не трудно.
Код
using System;
using System.IO;
using System.Linq;

namespace MFru
{
    public class Student
    {
        public int Group { get; set; }
        public string Surname { get; set; }
        
        public int Maths { get; set; }
        public int Informathics { get; set; }
        public int Physics { get; set; }
        public int ForeignLanguage { get; set; }
        
        public int Average
        {
            get
            {
                return (Maths + Informathics + Physics + ForeignLanguage) / 4;
            }
        }
        
        public Student(int group, string surname, int maths, int informathics, int physics, int foreignLanguage)
        {
            Group = group;
            Surname = surname;
            Maths = maths;
            Informathics = informathics;
            Physics = physics;
            ForeignLanguage = foreignLanguage;
        }
    }
    
    public class Program
    {
        public static void Main(string[] args)
        {
            var answer = string.Empty;
            
            // группа фамилия мат. инф. ист. иняз.
            var students = File.ReadAllLines("average.txt").Select(x => {
                   var ss = x.Split(' ');
                   return new Student(Convert.ToInt32(ss[0]), ss[1],
                                      Convert.ToInt32(ss[2]),
                                      Convert.ToInt32(ss[3]),
                                      Convert.ToInt32(ss[4]),
                                      Convert.ToInt32(ss[5]));
            });
            
            while(answer != "exit")
            {
                Console.Write("> ");
                answer = Console.ReadLine();
                
                var parsedAnswer = answer.Split(' ');
                if(parsedAnswer.Length == 0)
                    continue;
                
                switch(parsedAnswer[0])
                {
                    case "bs":
                        {
                            var aver = students.Max(x => x.Average);
                            var maxsts = students.Where(x => x.Average == aver);
                            foreach(var st in maxsts)
                            {
                                Console.WriteLine(string.Format("{0} {1} {2}", st.Group, st.Surname, st.Average));
                            }
                        }
                        break;
                        
                    case "gpa":
                        {
                            if(parsedAnswer.Length == 1)
                            {
                                foreach(var student in students)
                                {
                                    Console.Write(string.Format("{0} {1}", student.Surname, student.Average));
                                }
                                break;
                            }
                            
                            if(parsedAnswer[1] == "mathematics")
                            {
                                Console.WriteLine(students.Average(x => x.Maths));
                                break;
                            }
                            
                            var stud = students.FirstOrDefault(x => x.Surname == parsedAnswer[1]);
                            if(stud == null)
                            {
                                Console.WriteLine("Нет такого студента.");
                                break;
                            }
                            
                            Console.Write(string.Format("{0} {1}", stud.Surname, stud.Average));
                        }
                        break;
                }
            }
        }
    }
}


Блок схема будет чуть позже, мб кто-то из форумчан подсобит.
Если нужно будет более стабильное и правильное по феншую приложение, свисти поправлю.

Сообщение отредактировал IlluminatI - 7.1.2013, 13:49
Юзер вышелВ друзьяВизиткаП/Я
К началу страницы
+Ответить
Off line
сообщение 7.1.2013, 18:38


Опытный
***

Группа: Пользователи
Сообщений: 107
Регистрация: 16.7.2007
Пользователь №: 141 627
Модель телефона: ROKR E1 + ZN 5
Прошивка: Конфиденциальная ;)


Настроение:
В разработке NEW саунда ;)



Рейтинг: 47.5



IlluminatI,
Спасибо большое smile.gif Но я всё равно в этом не понимаю smile.gif просто друг попросил smile.gif ему скину пусть сам и разбираеться smile.gif
Юзер вышелВ друзьяВизиткаП/Я
К началу страницы
+Ответить
Нужна помощь в написнаии Visual Basic · Компьютеры, OS, Soft и Hardware · Forum
 

Ответ в темуСоздание новой темы
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



Текстовая версия Сейчас: 20.5.2019, 16:02

Форум живёт: