Проболел тему, нужна . 1. найти произведение цифр трехзначного числа. исправьте программу, запишите правильный вариант. и составить блоксхему program 2pp; var a,b: integer; begin read (b); c: =a mod 10; b: =a mod 100; a: =a div 10; write (b,c,a); end.

MishaZuev1 MishaZuev1    1   02.10.2019 13:40    0

Ответы
AlexUnderNewSky AlexUnderNewSky  09.10.2020 11:51

Program 2pp;

Var a,b: integer;

Begin

Read (a);

c:=a mod 10; b:=a div 100;

a:=(a div 10) mod 10;

Write (a*b*c);

End.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика