Div - целая часть, полученная от деления
mod - остаток, полученный от деления
<span>С=0???, если нет, то пересчитай
А: =624897
В: =а div 1000 =624
C: =( B+ C ) mod 100 =(624+0) mod 100=2
D:=(B+C) mod 10 =(624+2) mod 10=6
F:=С*D=2*6=12</span>

0 0

4 года назад

Нужны 2 программы в паскале ABC. Задания на фото.

maza007 [14]

===== PascalABC.NET =====

= 1 =

begin

var a, b: integer;

var x, z: real;

Write('Введите a, b, x, z: ');

Read(a, b, x, z);

var k := 1.0;

for var d := 1 to b do

begin

var c := 0.0;

for var s := 1 to a do

c += (d * d + x) / (s ** (3 / 2) + z);

k *= c

end;

Println('К =', k)

end.

= 2 =

begin

var b, n: integer;

var x, z: real;

Write('Введите b, n, x, z: ');

Read(b, n, x, z);

var g := 0.0;

for var c := 1 to b do

begin

var p := 1.0;

for var a := 1 to n do

p *= (a * a * a + z) / (c * c + x);

g += p

end;

Println('G =', g)

end.

0 0

3 года назад

Які властивості має файлСРОЧНО !!!!!!!!!

оппанна [37]

Дане вікно містить наступні вкладки.

0 0

4 года назад

Прочитать ещё 2 ответа