Перевести из паскаля в 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.
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.
More Questions From This User See All
Answers & Comments
Verified answer
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 = 2
L = 10
N = 20
Окончание ввода '0'
Число = 15
Число = 40
Число = 92
Число = 16
Число = 54
Число = 14
Число = 0
k = 2