begin
k1:=0
k2:=0
writeln (' Введите три числа');
if x<span><0 then k1:=k1+1;</span>
<span>if x<span><0 then k2:=k2+1;(ЕЩЕ " ЧИСЛА)</span></span>
<span><span>intil x=0;</span></span>
<span><span>writeln ('k1=',k1,'',k2=',k2)</span></span>
<span><span>end</span></span>
<span><span>я думаю наверно так))))))))))))))))</span></span>
Program fff;
var i, n, c : integer;
begin for i := 1 to 15 do begin readln(n); if n mod 10 = 4 then c := c + 1; end; writeln(c);end.
#include <iostream>
using namespace std;
int main()
{
int n, m;
cout << "n = ", cin >> n, cout << "\n";
m = n + 1 + (n+1)%2;
cout << "m = " << m;
return 0;
}
Пример:
<span>n = 17
m = 18</span>