Problem

3/17

أكبر رقمين - الخيار 2

Theory Click to read/hide

ضع في اعتبارك البديل الثاني لحل مشكلة إيجاد أقصى رقمين. & nbsp؛
في البرنامج الثاني ، سنكتب أولاً القيمة القصوى إلى متغير إضافي & nbsp؛ (دعنا نسميها Max )

Problem

1 ، قم بتشغيل البرنامج لتنفيذ
2. قم بتحليل النتيجة وتأكد من احتواء Max على قيمة A if A & gt؛ B و Max = B إذا B & gt؛ A
3. أجب عن السؤال: ما الكتلة التي سيتم تنفيذها إذا كانت A = B؟

time 1000 ms
memory 32 Mb
Rules for program design and list of errors in automatic problem checking

Teacher commentary

Insert the missing code snippets
Pascal
1 
var a, b, max: integer;
2 
begin
3 
    read(a, b);
4 
    if a > b then begin // заголовок - проверка условия
5 
        max := a; // если условие истинно, то выполняется блок операторов, стоящий после слова "if" (если)
6 
    end
7 
    else begin
8 
        max := b; // если условие ложно, то выполняется блок "else"  (иначе)
9 
    end;
10 
    writeln('Maximum ', max);
11 
end.

     

Program check result

To check the solution of the problem, you need to register or log in!