Var x: real;
{ процедура функция }
function y( x: real): real;
begin
if x>0 then Result:=5*x*x-(4/7)*x+2;
if x<0 then Result:=5*x*x-2*x+(1/3)*x-2;
end;
{ основная программа }
begin
write('Задайте значение x ');
readln(x);
if x=0 then writeln('при х = 0 функция не определена')
else writeln('Значение функции y = ',y(x):12:5);
end.
<span>
</span>
var a:integer;
begin
readln (a);
if (a>0) then
repeat
a:=a-3;
until(a<0);
if (b<0) then
repeat
a:=a+2;
until (a>70);
writeln (a);
end.
K = int(input())
m = int(input())
n = int(input())
if n<=k:
t = 2*m
elif n*2 % k==0:
t = m*(n*2 // k)
else:
t = m*(1+(n*2 // k))
print(t)
Пример:
2
1
3
3
Що допомогти ? Нічого ж немає
#include <iostream>
using namespace std;
int main() {
int s, t, res = 0;
cin >> s;
for (int i = 0; i < s; i++) {
cin >> t;
if (t % 10 == 3) res += t;
}
cout << res << endl;
return 0;
}