По информатике! у каждой из 7 старух 7 валов, в каждом вале 7 хлебов, в кажом хлебе 7 ножей. составить программу на паскаль с !

275

297

Посмотреть ответы 2

Ответы на вопрос:

Darina784

Информатика

4,8(12 оценок)

Program abc; var a,b,c,f,s: integer; begin write ( 'введите число старух ='); readln(a); write ( 'введите число валов ='); readln(b); write ( 'введите число хлебов ='); readln(c); write ( 'введите число ножей ='); readln(f); s: =a*b*c*f; write ('число всех ножей =' ,s); end

YouAreMyWeakness

Информатика

4,6(98 оценок)

//pascalabc.net 3.2 begin var count: =0; var n: =readinteger('n ='); while n mod 10 = 0 do begin inc (count); n: =n div 10; end; write (count); end. //mv c++ 10 #include < iostream> using namespace std; int main() { int n, count=0; cin > > n; while (n%10==0) {count++; n/=10; } cout< < count; return 0; }