дано число. определить, оканчивается ли данное число на цифру 7.

Знания

Информатика

2 ответа:

Инга09 [8]1 год назад

0 0

СLS
INPUT a
IF a MOD 10 = 7 THEN PRINT "да, оканчивается" ELSE PRINT "нет, не оканчивается"
END

И8ан11 год назад

0 0

С помощью регулярного выражения /^\d+7$/ например

Читайте также

Написать x, y, z на языке паскаль

Yogina [7]

program xyz;

var x,y,z,a,b,c:real;

begin

readln(x,y,z);

x:=(sqrt(a)+b)/2*a;

y:=sqrt(abs((3*x+4)/(1-2*x)));

z:=abs(sqr(Cos(x)))/(Ln(1+y));

writeln(z);

end.

0 0

2 года назад

40 000 байт = сколько кбайт 4 Мбайта = сколько Кбайт

bryncev58

Держи 39.06.))))))))))))

0 0

3 года назад

Напишите решение этого примера! уножить числа восьмеричной системе счислениия 347,2(8)х125,64 можно с решение пожалуйста!!!

федорбойлав [21]

Ответ. 46604,110 решение см. в файле

0 0

3 года назад

Помогите, пожалуйста( Составить программу определения меньшей из двух величин X и Y, где X=2A^2, а Y=3B. Значения A и B вводятся

Наталья Лосева

Program prog;
uses crt;

var a, b, x, y : real;

begin
clrscr;

write('A = ');
readln(a);
write('B = ');
readln(b);

x:=2*sqr(a);
y:=3*b;

writeln;
writeln ('X = ', x:0:3, ' Y = ', y:0:3);

if (x>y) then writeln('Min = ', y);
if (x<y) then writeln('Min = ', x);
if (x=y) then writeln('X = Y');
end.

0 0

4 года назад

Запишите пять разных имен файлов, удовлетворяющих маске *f?a?.p?*

Евгения2

F1a2.p1
sf2a2.p3
faaa.po
flag.pik
flag.png

*- любой символ, в том числе и пустой
? - один символ

0 0

4 года назад