ацу А ацу Регистрация 23 Мар 2013 Сообщения 105 Репутация 0 Спасибо 0 Монет 0 19 Янв 2017 #1 составить программу в паскаль Найти все «Пифагоровы тройки чисел» в первой тысяче натурального ряда.
dimka1321 D dimka1321 Регистрация 23 Ноя 2013 Сообщения 87 Репутация -1 Спасибо 0 Монет 0 19 Янв 2017 #2 Звучит как заказ. Где цена? Позитивный голос 0
Oleg Mordvinov O Oleg Mordvinov Регистрация 24 Сен 2013 Сообщения 96 Репутация 0 Спасибо 0 Монет 0 19 Янв 2017 #3 3,4,5...6,8,10... i:=1;while c<=100 do begin a;=3*i; b:=4*i; c:=5*i; writeln(a:4,b:4,c:4); end Позитивный голос 0
