Тема: ABC Pascal. Простые и составные условия. Алгорическая конструкция "ветвление" (if, then, else и проч.)
Задача: Дано целое число. Определить, оканчивается ли оно цифрой 7 и делится ли без остатка на 13.
Буду очень благодарна!
Предмет:
ИнформатикаАвтор:
popcornblackburnuses crt;var a:integer;beginwrite('Введите число: ');readln(a);if (a mod 13)=0 then write('Число делится без остатка на 13') else write('Число не делится без остатка на 13');writeln;if (a mod 10)=7 then write('Число оканчивается на цифру 7') else write('Число не оканчивается на цифру 7');end.Если нужно выполнять программу из-под программной оболочки, удали первую строку.
Автор:
kadeДобавить свой ответ
1)заполни пропуски.
семь десятых частей 1 квадратного см-______квадратных мм
три четвёртых части года-_ мес.
две тритьих части суток-__ч.
2)В книге было 13 сказок. После того как Юля прочитала несколько сказок, ей осталалось прочитать ещё 6 сказок. Сколько сказок Юля уже прочитала?
Составь устно 2 задачи, обратные данной и реши их.
3) Шесть одинаковых пачек печенья стоят 72 рубля. Сколько таких пачек печенья можно купить на 96 рублей?
Сколько рублей надо заплатить за 4 такие пачки печенья?
4)Маляр начал красит забор в 9 ч утра , а закончил в 13ч 40 мин. Сколько времени маляр красил забор?
5) Бабушка ехала от дома до дачи 1 ч 20 мин и приехала на дачу в 11 ч утра . В котором часу бабушка вышла из дома?
6) Лена вышла погулять с собакой в 14 ч 20 мин и гуляла с ней 1ч15 мин. В котором часу Лена вернулась с прогулки?
7)
В малом зале кинотеатра 20 рядов , по 15 мест в каждом. На вечерний сеанс до обеда продали 85 биетов, а после обеда-ещё 120 билетов. Сколько осталось продать билетов на этот сеанс?
Реши задачу сначала одним способом, а затем для проверки-другим.
Предмет:
МатематикаАвтор:
aidentx04Ответов:
Смотреть
В первенстве по тениссу участвовала 5 человек .Каждый сыграл с каждым по одной партии. Сколько было сыграно партий?
Предмет:
МатематикаАвтор:
tabethaОтветов:
Смотреть
Предмет:
МатематикаАвтор:
frederickОтветов:
Смотреть