"Винчестер", если о магнитном =)
Х - любое число х/х + 4 = 5 <span>х+ 5 - х=5</span>
#include<stdio.h>
void main()
{<span>
int Number,Sum = 0;
</span><span> printf("Input Number: \n");
</span><span> scanf("%d",&Number);
</span><span> while(Number>0)
</span><span> {
</span><span> Temp = Number;
</span><span> Sum = Sum + (Temp%10);
</span><span> Number/=10;</span><span>
}</span><span>
printf("%d \n",Sum);
</span><span>}</span>
Var
ves,rost,ogk:real;
begin
Write('Введите рост и длину окружности грудной клетки в см: ');
Readln(rost,ogk);
ves:=rost*ogk/240;
Writeln('Нормальный вес равен ',ves:5:1,' кг.')
end.
<em>И снова - приятно, когда кратко))
// PascalABC.NET 3.2, сборка 1483 от 14.06.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var w:=ReadAllText('in.txt'); w.Println;
var s:=w.MatchValues('\b[A-Za-z]+\b').JoinIntoString(' ');
s.Println; WriteAllText('Eng.txt',s);
s:=w.MatchValues('\b[А-Яа-яЁё]+\b').JoinIntoString(' ');
s.Println; WriteAllText('Rus.txt',s);
end.
<u>Пример (читаем in.txt, пишем в Eng.txt и Rus.txt)</u>
The Флегматичная ЭтА QuICk веРБлЮдица broWN ЖУЕТ fox JuMpS у подъезда over The ЗаСыХающИЙ LAZY ГорькиЙ dog шиПоВНиК
The QuICk broWN fox JuMpS over The LAZY dog
Флегматичная ЭтА веРБлЮдица ЖУЕТ у подъезда ЗаСыХающИЙ ГорькиЙ шиПоВНиК
