1)найти произведение натуральных чисел от f до 11 (f< 11) 2)найти сумму натуральных чисел от 21 до d решите правильно, добавлю ещё

PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018Внимание! Если программа не работает, обновите версию!1)

begin

 ReadInteger('f=').To(11).Aggregate(1, (p, q)-> p * q).Println

end.

f= 516632002)

begin

 21.To(ReadInteger('D=')).Sum.Println

end.

D= 561386

#include<iostream>#include<conio.h>using namespace std;
int main(){float milkPrice,bredPrice,procent; cout<<"moloko = "; cin>>milkPrice; cout<<"\nxleb = "; cin>>bredPrice; cout<<""<<endl; cout<<"podnyat ceny na "; cin>>procent; if (procent <= 0) { cout<<"plohoy procent"; _getch(); return 0; }else{   cout<<"stariye ceni:\nXLEb: "<<bredPrice<<" \nMoloco: "<<milkPrice<<endl;   cout<<""<<endl;   cout<<"new ceni:\nXLEb: "<<(bredPrice*procent/100)+bredPrice<<" \nMoloco: "<<(milkPrice*procent/100)+milkPrice; } _getch();return 0;}

Большую папку-тетрадь со сьемными листами и к ней листы-разграничители разного цвета (очень удобно разграничить все предмет и 100 тетрадей не надо заводить) , пару-тройку общих тетрадей для семинарских заданий, ручки, маркеры (обязательно, пригодится перед экзаменами (сразу главное выделять)) , калькулятор маленький (опять же для семинаров) , пенал (или можно возпользоваться карманом сумки))) , блок листов для принтера (для рефератов, курсовых и пр.) , файлы пачку, степлер и антистеплер. Ну вроде все, остальное по мере необходимости (типо папок для курсовых) . Да и дешевле купить свой принтер, чем печатать за платно каждый реферат.