Если быть совершенно точным, то условные операторы switch-case. отличаются от if тем, что if проверяет некое условие (любое условие), а блок switch-case сначала задает значение - switch (значение), а потом сравнивает его с условиями в case. следовательно, к примеру: if (n == 5) if (n == 2) if (n == -3) будет эквивалентно switch (n) { case 5: break; case 2: break; case -3: break; } учтите, что в switch-case ожидается использование break. если не поставить break, case, который ниже текущего, тоже будет выполнен.
Спасибо
Ответ дал: Гость
program xxx;
var a, b, s : real;
r, p, d : real;
begin
write ('введите певрое число- ');
readln (a);
write ('введите второе число- ');
readln (b);
s: = a+ b;
r : = a - b;
p : = a* b;
d : = a/b;
writeln ('сумма =', s);
writeln ('разность =', r);
writeln ('произведение =', p);
writeln ('частное = ', d);
readln
end.
Ответ дал: Гость
var
s: string;
z,z1,i: integer;
begin
readln(s);
z: =0;
z1: =0;
for i: =1 to length(s) do
begin
if s[i]='м' then inc(z);
if s[i]='н' then inc(z1);
end;
if z> z1 then writeln('больше букв м');
if z< z1 then writeln('больше букв н');
if z=z1 then writeln('букв м и н равное количество');
Популярные вопросы