3 different lines of symbols are given. To define the longest line and to give its length on the screen. Pascal.

Question

3 different lines of symbols are given. To define the longest line and to give its length on the screen. Pascal.

Kirik 2020-10-26 10:00:32

206

Program n1; var s, s1, s2: string; function max (a, b, c: integer): integer; begin max: = 0; if (a> b) and (a> c) then max: = else if (b> c) and (b> a) then max: = b else if (c> a) and (c> b) then max: = c; end; begin readln (s); readln (s1); readln (s2); write (max (length(s), length (s1), length (s2))); end.

233

Answer add 2020-10-26 04:37:14

Sterre

3 different lines of symbols are given. To define the longest line and to give its length on the screen. Pascal.

Other questions in the section - informatics