<em>// PascalABC.NET 3.2, сборка 1367 от 20.12.2016</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a,b:integer;
Write('Введите a и b: '); Read(a,b);
Writeln('П=',Range(a,b).Aggregate(BigInteger(1),(m,n)->m*n))
end.
<u>Пример</u>
Введите a и b: 13 57
П=84607064997021339293398188869165201400121387478093188300800000000000
Браузер - это программа позволяющая создать соединение между ПК и поставщиком интернет-услуг
Ответ:
вүщемвмш овглмвпгвииащглагмплгмпмвшмвш
#include "stdafx.h"
#include <iostream>
#include <string>
#include <fstream>
using namespace std;
int main(){
setlocale(LC_ALL, "Russian");
ifstream in_file("f.txt"); // файл со строками
ofstream out_file("g.txt"); // файл со строками, длиннее 5 слов.
string buffer; // промежуточная переменная, для хранения проверяемой строки
int count; // счетчик слов в строке
while (getline(in_file, buffer))
{
count = 0;
for (unsigned int i = 0; i < buffer.length(); i++)
{
if (buffer[i + 1] == ' ' || buffer[i+1] == '\0')
{
count++;
}
}
cout << "Количество слов в строке: "<< count << endl;
if(count > 5)
{
out_file << buffer << endl;
}
buffer.clear();
}
in_file.close();
out_file.close();
return 0;
}
Писал в visual c++ , советую там и проверять. Все слова разделяют одним пробелом и заканчивается строка словом, без пробела после него, ибо это уже неверно будет
