вообщем это нужно сделать втурбо паскале через оператор ваил: Введете числа с кловиатуры пока их сумма не привысет число 50 или их количество не станет больше 5 заранее СПАСИБО)
Паскаль не знаю... Code: var: count, sum, ch:integer begin do begin readln(ch); count=count+1; sum=sum+ch; end; while(sum < 50 OR count < 5) end. С++ Code: #include <stdio.h> int main() { int sum = 0,count = 0,sh = 0; while(sum < 50 || count < 5) { scanf("%d", &ch); sum += ch; count++; } return 0; }
Code: uses crt; var i, s, k: integer; begin clrscr; s:=0; i:=0; while (s < 50) and (i < 5) do begin write ('Введите число: '); readln (k); i:=i+1; s:=s+k; end; end. Code: Введите число: 10 Введите число: 20 Введите число: 30 [Процесс завершен] Code: Введите число: 51 [Процесс завершен]