Написать программку в паскале(тема циклов) и блок схему :Для различных вводимых

Написать программку в паскале(тема циклов) и блок схему :
Для разных вводимых с клавиатуры целых чисел найдите сумму положительных нечетных.

Задать свой вопрос
Мардониев Сашок
А для чего тогда вводить отрицательные и четные, если они позже не рассматриваются?))
1 ответ
Program kek; Var a, c:integer; Begin c:=0; a:=1; While alt;gt;0 do begin Writeln('Вводите целые числа. Когда окончите - введите "0"'); Readln(a); If (agt;0) and (a mod 10 = 1) then do begin c:=c+a; end; End; Writeln(c); End. Вроде так. Нет способности проверить.
Керческу Генка
А блок-схема?
Биконь Нелли
Что такое блок схема. Я не разумею.
Манахимов Владислав
Нельзя выучиться писать программки, не изучив понятия блок-схемы. Так что Ваш вопрос разговаривает о том, что Вы ответ откуда-то списали.
Морозюк Милена
Я не списывал.
Милана Мельнева
тогда Вы придуряетесь, разговаривая, что не понимаете о блок-схемах.
Маргарита Вуцына
третьего тут не дано
Александра Светланина
Как желаете
Лариса
Мне, в общем-то все одинаково, лишь бы творца вопроса устроила.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт