• Перевести из паскаля в c#

    Var t,m,l,n,k:integer;
    Begin
    write('M = ');readln(m);
    write('L,N = ');readln(l,n);
    writeln('Окончание ввода "0"');
    Repeat
    write('Число = ');
    readln(t);
    if (t mod m = 0)and(l<=t)and(t<=n)and(t<>0) then inc(k);
    Until t=0;
    writeln(k);
    End.

Ответы 1

  • using System;public class Test{ public static void Main() { int t, m, l, n, k=0; Console.Write("M = "); m = int.Parse(Console.ReadLine()); Console.Write("L = "); l = int.Parse(Console.ReadLine()); Console.Write("N = "); n = int.Parse(Console.ReadLine()); Console.Write("Окончание ввода '0'"); do { Console.Write("Число = "); t = int.Parse(Console.ReadLine()); if ((t % m == 0)&&(l<=t)&&(t<=n)&&(t != 0)) k++; } while (t != 0); Console.Write("k = {0}", k); }}Пример:M = 2L = 10N = 20Окончание ввода '0'Число = 15Число = 40Число = 92Число = 16Число = 54Число = 14Число = 0k = 2
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years