P1000
[mw_shl_code=cpp,true]#include <iostream>
int main()
{
int a,b;
cin >> a >> b;
cout << a+b << '\n';
return 0;
}
[/mw_shl_code]
P10001
[mw_shl_code=pascal,true]var
i,hand,ans:longint;
a:array[1..10] of longint;
begin
ans := 0;
for i:=1 to 10 do
read(a);
read(hand);
hand:=hand+30;
for i:=1 to 10 do
if a <= hand then
inc(ans);
writeln(ans);
end.[/mw_shl_code] |