Помогите пожалуйста(1) периметр треугольника равен P. длины двух сторон равны между собой. найти длины сторон.2) Вводится N целых чисел, найти количество чисел, которые больше нуля и кратны числу 5.На языке Паскаль(АВС)
Ответы:
30-11-2016 20:50
const N=5;var i, a, b: integer;begin for i:=1 to N do begin readln(b); if ((b > 0) and (b mod 5 = 0)) then a := a + 1; end; writeln(a);end.
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Помогите пожалуйста(1) периметр треугольника равен P. длины двух сторон равны между собой. найти длины сторон.2) Вводится N целых чисел, найти количество чисел, которые больше нуля и кратны числу 5.На языке Паскаль(АВС)» от пользователя Ангелина Кондратенко в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!