Ребят подскажите При открытие в cmd пишет: Непредвиденное появление: if.
@ECHO OFF
for if "tokens=2 delims =[]"%%x in ('ver') do set 10.0.19041.685=%%x
set 10.0.19041.685 =% 10.0.19041.685:version =%
ECHO сделал Морозов Дмитрий к79/2,вариант 8
ECHO .
ECHO предназначен для смен времени
ECHO .
ECHO имя файла var8.bat
ECHO .
ECHO применяется в консоли
ECHO .
ECHO Версия cmd=%10.0.19041.685%
set if "%1" "echo Usage:%0 DD.MM.YY HH:MM:GG
% 0 DD.MM.YY HH:MM:GG
if not "%1"==" " "date%1
if not "%2"==" " "time%2
ECHO End of file
PAUSE
Первая
var n,x:integer;
begin
readln(n);
while n <> 0 do begin
x:=x + n mod 10;
n:=n div 10;
end;
if(x mod 2 = 0) then
writeln('true')
else
writeln('false');
end.
Вторая
var x,z,s:integer;
begin
readln(x);
if (x > 99) and (x < 1000) then begin
s:=x;
while s<>0 do begin
z:=z+s mod 10;
s:=s div 10;
end;
if(x*x) = (z*z*z) then
writeln('true')
else
writeln('false');
end
else
writeln('Число должно быть 3-ех значным!');
end.
Третья
Var a,b,c:Real;
Begin
Writeln('Введите a');
Readln(a);
Writeln('Введите b');
Readln(b);
Writeln('Введите c');
Readln(c);
if (a=b) or (a=c) or (b=c) then
writeln ('true')
else
writeln ('false);
end.