Предмет: Информатика,
автор: liider8
СРОЧНО Перевести из паскаля в c#
Program gt;
var i,p:int64;
begin
p:=1;
for i:=1 to 1000 do
begin
if(i mod 2=1)and(i mod 13=0)then p:=p*i;
end;
writeln(p);
end.
Ответы
Автор ответа:
1
Код писался в Visual Studio 2017 для MacOs :
using System;
class MainClass
{
public static void Main(string[] args)
{
long i, p;
p = 1;
for (i = 1; i < 1001; i++)
if ((i % 2 == 1) && (i % 13 == 0))
p *= i;
Console.WriteLine(p);
}
}
Приложения:
Похожие вопросы
Предмет: Русский язык,
автор: ahtemova1nazife
Предмет: Геометрия,
автор: MMARassun
Предмет: Химия,
автор: Аноним
Предмет: Алгебра,
автор: кувасеп
Предмет: Математика,
автор: друг123животных