Вводится четырёхзначное число (xysz). Вывести сумму - вопрос №17444253 от bringm1 07.03.2022 16:09

Question

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

bringm1 · 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....