Задать вопрос
22 января, 04:07

Перевести из паскаля в 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 (t0) then inc (k) ;

Until t=0;

writeln (k) ;

End.

+4
Ответы (1)
  1. 22 января, 05:59
    0
    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
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Перевести из паскаля в c# Var t, m, l, n, k:integer; Begin write ('M = ') ; readln (m) ; write ('L, N = ') ; readln (l, n) ; writeln ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике