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

0 голосов
148 просмотров

Дано целое число определить оканчивается ли оно цифрой 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 баллов)

нез!)

...