|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
18.06.2017, 20:07 | #1 |
Регистрация: 13.06.2017
Сообщений: 5
|
Как перевести эту программу в While и в Repeat?
Program Sanya5;
Var a,b,c: integer; Begin c:=0+1; for b:= 1 to 11 do begin readln (a); if (a>0) and ((a mod 2)=0) then c:=c+1; end; writeln ('Четных чисел - ',c); end. |
18.06.2017, 20:32 | #2 |
Пользователь
Регистрация: 21.12.2011
Сообщений: 54
|
Если еще актуально, пишите: stealth(собака)bigmir.net
Сразу указывайте на когда нужна работа и предполагаемый бюджет. |
18.06.2017, 20:33 | #3 |
Пользователь
Регистрация: 27.03.2015
Сообщений: 15
|
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Тема: Сортировка массивов. Вы знаете, как получить эту программу? | Бугра | Паскаль, Turbo Pascal, PascalABC.NET | 1 | 06.04.2016 05:34 |
Как написать вот эту программу в Delphi | valeriy.sabziro | Помощь студентам | 3 | 21.12.2015 15:46 |
Опять же C++ как сделать эту программу | zyzz159 | Помощь студентам | 17 | 26.11.2015 20:54 |
Как редактировать эту программу? | Roblen | Паскаль, Turbo Pascal, PascalABC.NET | 0 | 21.03.2015 22:43 |
как изменить эту программу чтобы она заработала? | Анастасия91 | Visual C++ | 6 | 13.12.2010 08:05 |