вводить числа с клавиатуры,конец ввода число 999.найти и выдать ** экран произведение...

0 голосов
60 просмотров

вводить числа с клавиатуры,конец ввода число 999.найти и выдать на экран произведение отрицательных чисел.организовать повтор через запрос(повторять-Y,N-нет)при вводе N-выход из программы


Информатика (15 баллов) | 60 просмотров
Дано ответов: 2
0 голосов
Правильный ответ

Program BraTish77;
uses crt;
var
  p,temp: integer;
  yes:char;
begin
  yes:='Y';
  writeln('*** alphaues is thinking... ***');
  writeln('***          OK             ***');
  writeln();
  p:=1;
  temp:=1;
  writeln('Вводите числа (для окончания ввода введите 999) ');
  while (yes = 'Y') or (yes = 'y') do
    begin
      p:=1;
      temp:=1;
      repeat
        write('Число:'); readln(temp);
          if temp <0 then p:=p*temp;<br>      until temp=999;
      writeln('Произведение отрицательных чисел равно ',p);   
      write('Повторить? (Y/N) '); readln(yes);
    end;
  writeln('Выход из программы');   
end.


(52.6k баллов)
0 голосов

 

на языке C++:

 

#include

#include

#include

 

 

using namespace std;

 

int main () {

int result = 1;

int c;

string answer = "";

 

while (1) {

cout << "Введите число";</p>

cin >> c; 

if (c == 999)

 if (result == 1)

{cout << "Не введены отрицательные числа"<< endl; return 0;}</p>

else {cout << "результат: " << result << endl; return 0;}</p>

else if (c<0)result *= c;</p>

cout << "продолжить? <YES> | ";

сin.getline(answer, sizeof(string));

 

 if (strcmp(answer, "YES")==0) continue;

else return 1;

}

}

(100 баллов)