(1+1/sqr((12*x), если без игрика, а как игрик впихнуть не могу
Ответ дал: Гость
существительные женского рода
Ответ дал: Гость
var a: array [1..16] of integer;
i,s,c,d: integer;
begin
randomize;
read(c,d);
for i : = 1 to 16 do begin
a[i]: = random(d+c) - c;
if a[i]> 0 then s: = s + a[i];
end;
writeln(s);
end.
Ответ дал: Гость
№1
program z1;
var n: integer;
begin
write ('введите число n: ');
readln(n);
if (n mod 2 = 0) and (n div 100 < 1) and (n > 9) then write('данное число является четным двузначным') else if (n div 100 < 1) and (n > 9) then write ('данное число не четное двузначное');
Популярные вопросы