#include <stdio.h>
int
main ()
{
int a, b, c, d=1;
scanf ("%d", &a);
scanf ("%d", &b);
scanf ("%d", &c);
if (b>a) {a=b;d=2;}
if (c>a) {a=c;d=3;}
printf("The largest entered number is number %d and is equal to %d", d, a);
return 0;
}
компьютер
Объяснение:
К \"о\" мПьют (в слове \"путь\" \"у\" заменили на \"ью\" и убрали \"ь\")Ер (от слова сердце)Как-то так
Ответ:
1. Pascal
2. в настоящий момент: Embarcadero
3. Save All... (Shift + Ctrl + S)
4. File -> New
5. Первая создаваемая форма в проекте
меняется: Project -> Opion -> Forms
6. TForm.Caption
7. Project -> Opion -> Application: Load Icon
8. Show; Hide; Close;
9. TLabel
10. TEdit
11. TLabel.Caption
12. TLabel.Alignment
13. TLabel.Layout;
14. TMemo.Lines
15. s := '';
Delete (s: String, Index: Integer; Count: Integer)
Insert (Substr: string; Dest: string; Index: Integer);
16. PasteFromClipboard CopyToClipboard
17. TEDit.Text;
С полной уверенностью могу сказать, что тут определенно не ген.
<em>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</em>
<em>Внимание! Если программа не работает, обновите версию!</em>
begin
var n:=ReadlnInteger;
ReadSeqInteger(n).JoinIntoString('').
Where(c->c in ['2','4','6','8']).Select(c->c.ToDigit).Sum.Println
end.
<u>Пример</u>
13
4492 13638 -4490 4186 13985 -4266 5805 -26574 28710 -378 17920 1886 -24200
146
