надобно составить программку в Паскальв конце я не уверенна, надобно как

Надо составить программку в Паскаль
в конце я не уверенна, надо как то по другому соединить их ....
ПОМОГИТЕ,ПОЖАЛУЙСТА... ОЧЕНЬ Надобно

Задать свой вопрос
Люба Жаркина
если бы я знала
Денис Павлятенко
тогда трудно что-или написать..
Шафонский Иван
все что нам дал учитель это: отыскать числа кратные 5,13... xmod5=0, xmod13=0
Лендеман Оксана
это и есть условие) то есть отыскать числа кратные и 5, и 13 сразу?
Городицкая Ольга
ну в роде того
Валерий Зихлинский
Вывести сами числа либо их количество?
Диман Сидонцев
вобще нам произнесли, что программу надо сочинять по этой фигня, которая в прибавленьи
Стефания Решенцева
предполагаю, что сами числа
Кикаев Сашок
а может и их кол-во.. не знаю я
Игорь Салогуб
это блок-схемы, они описывают содержание программы.
1 ответ
Var x: integer;
Begin
Read (x);
If x mod 5 = 0 and x mod 13 = 0 then
Write(x);
end.
Лариса Джаватова
else не непременно.
Антон Колойда
program n_5;Var x: integer;BeginRead (x);If x mod 5) = 0 thenx кратно 5 elseif x mod 13=0 thenx кратно 5 elseлевое числоWrite(x);end.
Артём
надобно типо того, только правильно составить
Константин Семикозов
а что за "левое число"? Ты в программке так и пишешь - "кратно"?)
Владислав Кухтин
учитель произнес, а мне все равно
Борис
я не разумею как надобно правильно её составить
Тамара Сарвян
Var x: integer;BeginRead (x);If x mod 5 = 0 and x mod 13 = 0 thenWrite(x);end. обязано работать!
Степка Кичибеев
Program1.pas(5,4): Операция '=' не применима к типам integer и boolean
Злата
не работает
Виктория Толстина
я только что запускал эту программку. Всё работает.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт