// ConsoleApplication4.cpp: определяет точку входа для консольного приложения.
//
#include "stdafx.h"
#include <iostream>
#include <string>
using namespace std;
class stud {
public:
void setname(string sname)
{
name = sname;
}
string getname()
{
return name;
}
string getsurname()
{
return surname;
}
void setsurname(string ssurname)
{
surname = ssurname;
}
void setscore(int sc[])
{
for (int i = 0; i<10; i++) score[i] = sc[i];
}
float getsr()
{
float sum = 0;
for (int i = 0; i<10; i++) sum += (float)score[i];
return sum / 10;
}
void showmyself()
{
cout << "Студент: " << name << " " << surname << endl;
cout << "Имеет 10 текущих оценок: ";
for (int i = 0; i < 10; i++) cout << score[i] << " ";
cout << "" << endl;
cout << "Его средний балл: " << getsr() << endl;
}
private:
string name;
string surname;
int score[10];
};
int main(int acgc, char* argv[])
{
setlocale(LC_ALL, "rus");
stud student1;
int score[10];
string name, surname;
cout << "Введите имя студента: "<<endl;
getline(cin, name);
cout << "Введите фамилию студента: " << endl;
getline(cin, surname);
cout << "введите 10 текущих оценок через пробел: " << endl;
for (int i = 0; i<10; i++) cin >> score[i];
student1.setname(name);
student1.setsurname(surname);
student1.setscore(score);
student1.showmyself();
system("pause");
}
<em>// PascalABC.NET 3.2, сборка 1417 от 28.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
procedure CreateFile(p:string);
begin
var f:=OpenWrite(p);
Writeln(f,'В чащах юга жил бы цитрус? Да, но фальшивый экземпляръ!');
Writeln(f,'СЪЕШЬ ЖЕ ЕЩЁ ЭТИХ МЯГКИХ ФРАНЦУЗСКИХ БУЛОК, ДА ВЫПЕЙ ЧАЮ');
Writeln(f,'ФлегмаТичНая этА веРБлЮдиЦа жует у пОДЪезда засыХающий горький шиповник');
Writeln(f,'The quick brown fox jumps over the lazy dog');
Writeln(f,'THE FIVE BOXING WIZARDS JUMP QUICKLY');
f.Close
end;
procedure UpFile(p:string);
begin
var a:=ReadAllLines(p);
WriteAllLines(p,a.Select(s->UpperCase(s)).ToArray);
end;
begin
var p:=ReadlnString('Введите имя файла (можно, с путём):');
CreateFile(p);
UpFile(p);
// контроль работы
ReadAllLines(p).Println(NewLine)
end.
<u>Пример работы</u>
Введите имя файла (можно, с путём): MyTest.txt
В ЧАЩАХ ЮГА ЖИЛ БЫ ЦИТРУС? ДА, НО ФАЛЬШИВЫЙ ЭКЗЕМПЛЯРЪ!
СЪЕШЬ ЖЕ ЕЩЁ ЭТИХ МЯГКИХ ФРАНЦУЗСКИХ БУЛОК, ДА ВЫПЕЙ ЧАЮ
ФЛЕГМАТИЧНАЯ ЭТА ВЕРБЛЮДИЦА ЖУЕТ У ПОДЪЕЗДА ЗАСЫХАЮЩИЙ ГОРЬКИЙ ШИПОВНИК
THE QUICK BROWN FOX JUMPS OVER THE LAZY DOG
THE FIVE BOXING WIZARDS JUMP QUICKLY
1) система поиска организована быстрей удобней.
...
235) можно распечатать, или отправить то что нужно.
...
23423) быстрей и чаще обновляется.
...
<span>1000000) можно дать другу с флэшкой, не в ущерб себе. </span>
Немного непонятно, о каком именно коэффициенте сопротивления идёт речь (если задача действительно по информатике, а не по физике). По размерности подходит такое выражение для силы сопротивления (я буду считать, что дано именно оно, плотность воздуха ρ примем равной 1,25 кг/м3):
Уравнение движения парашютиста:
Для решения задачи создадим таблицу, в которой будут столбцы: время, координата, скорость и ускорение. Со временем проще всего, это последовательные шаги, начиная с 0 с с некоторым шагом t. Затем вычисляем по формуле ускорение, скорость (изменение скорости есть a * t), и координату (изменение координаты есть v * t). Когда парашютист достигнет земли, его координата не должна меняться, это можно сделать при помощи функции ЕСЛИ.
Получившийся файл Excel и графики приложены к ответу.