3. даны длины ребер a, b, c прямоугольного параллелепипеда. найти его объем v и площадь поверхности s.справка: v = a∙b∙c, s = 2∙(a∙b + b∙c + a∙c)

Var   a,b,c,v,s: integer; begin   readln(a,b,c);   v: = a*b*c;   s: = 2*(a*b+b*c+a*c);   writeln('v=',v,'   s=',s); end.

//pascalabc.net версия 3.4.0.1677 от 17.06.18

//если программа не запускается, то обновите версию

begin

    var zarazheno : = 1;

    var sum : = zarazheno;

    for var i : = 1 to 4 do

    begin

        zarazheno *= 10;

        sum += zarazheno;

        writelnformat('{2} новозараженно = {0}, всего заражено = {1}', zarazheno, sum, i);

    end;

end.

вывод

1 новозараженно = 10, всего заражено = 11

2 новозараженно = 100, всего заражено = 111

3 новозараженно = 1000, всего заражено = 1111

4 новозараженно = 10000, всего заражено = 11111

Целые  числа = натуральные (1,2,3,  противоположные им (-1,-2,-3,-  и  0. кол-во мест в зрительное зале может быть только целым. рост человека не будет целым (впринципе зависит от единиц (например, 1,8 метра - не целое, 180 см - целое), но точно измерить рост  нельзя). марка автомобиля обычно целое число. площадь не будет целым (аналогично росту, только погрешность ещё больше). в паскале целый тип представлен 32-битными целыми  числами ( обозначается integer; shortint; longint; byte; word ).