//Microsoft (R) C/C++ Optimizing Compiler Version 19.00.23506 for x64
#include <iostream>
#include <fstream>
#include <string>
using namespace std;
int main()
{
fstream f("F1.txt");
size_t max_size;
string s, max_word, word;
while ( getline(f, s) ) {
istringstream is(s);
max_size = 0;
while (is >> word) {
if (max_size < word.size()) {
max_size = word.size();
max_word = word;
} else if (max_size == word.size()) {
max_word += " = ";
max_word += word;
}
}
cout << max_size << ' ' << max_word << endl;
}
}
_____________________________
Пример:
asfasfafs sdf sdg xcz
zxcvxcv sdggsd
asdgsdg
sgdgsd sdagsdg
gsd sdg sdg
sdggg sdg sh
Ответ:
9 asfasfafs
7 zxcvxcv
7 asdgsdg
7 sdagsdg
3 gsd = sdg = sdg
5 sdggg
А) Ечимпие или емнимпие (получилась какая-то безсмысслица)
Б) Код
И не "морза", а морзе :-)
Var n: integer;
begin
writeln('Введите число:');
readln(n);
if n mod 2 =0 then writeln('Это четное число')
else writeln('Это нечетное число')
end.
var
m:integer;
n:real;
begin
n:=120;
m:=0;
while n<150 do
begin
n:=1.02*n;
m:=m+1;
end;
writeln('Ответ: ',m)
end.
У1=1030-1905=-875
У2=1030-396=634
Program n1;
Uses CRT;
Var a,b,s,i: integer;
begin
writeln('Vvedite A i B');
readln(a,b);
If a>b then
for i:=b to a do
begin
writeln(i);
s:=s+i;
end
else
if b>a then
for i:=a to b do
begin
writeln(i);
s:=s+i;
end
else writeln('ravny');
writeln('Summa = ',s);
readln
end.