Дано целое число определить оканчивается ли оно цифрой 7Даны два числа Замените меньшее...

0 голосов

Дано целое число определить оканчивается ли оно цифрой 7
Даны два числа Замените меньшее из двух чисел их произведением а большей средним арифметическим этих чисел
дано двузначное число определить входит ли в него цифра B
Информатика срочно надо


спросил от (15 баллов) в категории Другие предметы
оставил комментарий от Начинающий (212 баллов)

На каком языке?

оставил комментарий от (15 баллов)

на русском

оставил комментарий от Начинающий (212 баллов)

ахаха. Программном языке: паскаль, питон, си??

оставил комментарий от (15 баллов)

паскаль

оставил комментарий от (15 баллов)

поможешь

1 Ответ
0 голосов
ответил от Начинающий (212 баллов)
 
Лучший ответ

Var x: integer;
begin
read(x);
if x mod 10=7 then writeln('Yes');
if x mod 10 <>7 then writeln ('No');
end.

оставил комментарий от Начинающий (212 баллов)

if (a mod 10=B) or (a div 10=B) then begin

оставил комментарий от Начинающий (212 баллов)

read(B);

оставил комментарий от Начинающий (212 баллов)

writeln('Yes');

оставил комментарий от Начинающий (212 баллов)

end

оставил комментарий от (15 баллов)

спасибо

оставил комментарий от Начинающий (212 баллов)

else begin

оставил комментарий от Начинающий (212 баллов)

writeln('No');

оставил комментарий от Начинающий (212 баллов)

end;

оставил комментарий от Начинающий (212 баллов)

end.

оставил комментарий от Начинающий (212 баллов)

нез!)

...