Надо составить программу в Паскаль в конце я не уверенна, надо как то по другому соединить их .... ПОМОГИТЕ,ПОЖАЛУЙСТА... ОЧЕНЬ НАДО
если бы я знала
тогда сложно что-либо написать..
это блок-схемы, они описывают содержание программы.
а может и их кол-во.. не знаю я
предполагаю, что сами числа
вобще нам сказали, что программу надо составлять по этой фигня, которая в приложении
Вывести сами числа или их количество?
ну в роде того
это и есть условие) то есть найти числа кратные и 5, и 13 одновременно?
все что нам дал учитель это: найти числа кратные 5,13... xmod5=0, xmod13=0
Var x: integer; Begin Read (x); If x mod 5 = 0 and x mod 13 = 0 then Write(x); end.
program n_5; Var x: integer; Begin Read (x); If x mod 5) = 0 then x кратно 5 else if x mod 13=0 then x кратно 5 else левое число Write(x); end.
не работает
Program1.pas(5,4): Операция '=' не применима к типам integer и boolean
Var x: integer; Begin Read (x); If x mod 5 = 0 and x mod 13 = 0 then Write(x); end. должно работать!
я не понимаю как надо правильно её составить
учитель сказал, а мне все равно
а что за "левое число"? Ты в программе так и пишешь - "кратно"?)
надо типо того, только правильно составить
else не обязательно.
я только что запускал эту программу. Всё работает.