Вводится четырёхзначное число (xysz). Вывести сумму - вопрос №17444930 от вита1404 01.01.2020 08:48

Question

Информатика: Вводится четырёхзначное число (xysz). Вывести сумму xy + sz. Начальные данные необходимо ввести с клавиатуры. паскаль

вита1404 · Answer

var N,x,y,s,z:integer;begin writeln( Введите 4-значное число ); readln(N); x:=N div 1000; y:=N div 100 mod 10; s:=N div 10 mod 10; z:=N mod 10; writeln(x*y+s*z);end....