Есть ответ 👍

Какая задача решается по следующей программе?
Program Test;
var A, B, C: intager;
begin
readln (A, B) ;
C: = (A+B) * (B-A)
writeln (C)
end.
Какой результат будет получен, если в качестве исходных значений А и В ввести соответственно 7 и 8?

270
497
Посмотреть ответы 1

Ответы на вопрос:


// pascalabc.net 3.1, сборка 1198 от 11.03.2016 begin   var n: =readinteger; // очередной элемент   var k: =0; // искомое количество   var max: =n;   while n< > 0 do begin       if n=max then inc(k)       else           if n> max then begin max: =n; k: =1 end;       n: =readinteger;       end;   writeln('число ',max,' встретилось ',k,' раз(а)') end. тестовое решение: 4 6 2 6 1 6 9 3 9 5 2 0 число 9 встретилось 2 раз(а)

Популярно: Информатика