Приветствую Вас, Гость! Регистрация RSS

<Uzh.Soft/>

Воскресенье, 19.05.2024
Главная » 2012 » Декабрь » 18 » Вывести все числа a mod 6 = 4 и подсчитать их колисество(Pascal)
17:24
Вывести все числа a mod 6 = 4 и подсчитать их колисество(Pascal)
  1. var i,count: integer;
  2.  
  3. begin
  4.   for i:=1 to 99 do
  5.     if i mod 6 = 4 then 
  6.     begin
  7.       writeln(i);
  8.       inc(count);
  9.     end;
  10.     writeln('count = ',count);
  11. end.
Категория: Простые примеры | Просмотров: 556 | Добавил: is | Теги: Pascal условия и циклы | Рейтинг: 0.0/0
Всего комментариев: 0
Имя *:
Email *:
Код *: