|
Тестування з теми "ЦИКЛИ З ПАРАМЕТРОМ"
1. Фрагмент програми k:= 0; for i:= 1 to n do begin Read(ch); if (ch<'0') or (ch>'9') then k:= k+1; end; Write(k); виводить, скільки серед n введених символів є символів, що: | ||||||
2. Змінна x:= 2*random(10)+4*random(7)+2 набуває значень із проміжку: | ||||||
3. Для генерування дійсного числа х із інтервалу [A; B) використовують: | ||||||
4. Фрагмент програми k:= 0; for i:= 1 to n do begin Read(x); d:= x div 100; c1:= x mod 10; c2:= (x mod 100) div 10; if (d=0) and (c1=c2) then k:= k+1; end; if k>0 then Write('yes') else Write('no'); пише "yes", якщо серед введених n чисел є: | ||||||
5. Фрагмент програми k:= 0; t:= 0; for i:= 1 to n do begin Read(x); if (x>0) and (x mod 2=0) then t:= t+1; k:= k+1; end; if t=k then Write('yes') else Write('no'); виводить 'yes', якщо серед n цілих чисел: | ||||||
6. При обчисленні значень функції крок - це: | ||||||
7. Фрагмент програми k: =0; for i:= 1 to n do begin Read(x); if (x mod 5=0) or (x mod 5= 1) and (x mod 2 =0) then k: k+1; end; Write(k); виводить, скільки серед n введених чисел: | ||||||
8. Фрагмент програми k: =0; s:= 0; for i:= 2 to (x div 2) do begin if x mod i=0 then begin k:= k+1; s:= s+i; end; end; Write(k,' ',s); для цілого додатного числа х обчислює кількість і суму: | ||||||
9. Співставте фрагмент і результат роботи:
1С, 2В, 3А; |
Дата добавления: 2015-08-28; просмотров: 61 | Нарушение авторских прав
<== предыдущая лекция | | | следующая лекция ==> |
1. Клетки юкстагломерулярного аппарата вырабатывают: | | | Тестування з теми ЦИКЛИ З ПАРАМЕТРОМ |