1.var 2.a, product : real; 3.i, n : integer; 4.begin 5.product: = 1; 6.readln(n); 7.for i : = 1 to n do begin 8.readln(a); 9.if a < 0 then 10.: = product*a; 11.end; 12. writeln(product: 0: 2);
Спасибо
Ответ дал: Гость
нет,оно вряд ли.ведь что такое компьютер? это арифрометр.не видили никогда такую машинку? компьютер работает тупо.а про разборки (искусственого интелекта) я могу много баек рассказать могу это дело.и в ученые доили.государство,и в сша.
Ответ дал: Гость
плата вроде как, если не ошибаюсь
Другие вопросы по: Информатика
Похожие вопросы
Знаешь правильный ответ?
Ввести с клавиатуры n-любых чисел ,найти количество отрицательных чисел( паскаль )...
Популярные вопросы