Информатика, опубликовано 09.04.2019 16:40
Склавиатуры вводится 10 целых чисел, найти наибольшее из чисел оканчивающихся на 7
Ответы
Ответ оставил: Гость
Var a,i,max: integer; begin max: =0; for i: = 1 to 10 do begin read(a); if (abs(a) mod 10 = 7)and(a> max) then max: =a; end; writeln('max = ',max); end.Ответ оставил: Гость
наименьшее из четырех заданных чисел.Ответ оставил: Гость
Вы забыли вставить картинку....Ответ оставил: Гость
Jeghieghegueiolghegiueguieg?
Другие вопросы по информатике
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
