Создаем Вирус который вырубает жертве комп

[storm00]

вот вам простенькач прога, она не вредит ничему, просто язык куда лучше чем писанина в блокноте
первый кто угадает язык програмирования и тчто делает прога дам монет

var
B:real;
n:integer;
A:array[1..10] of real;
begin
for n:=1 to 10 do
Begin
writeln('введите число' , n, '-е число;');
readln(A[n]);
end;
begin
B:=(A[1]*A[2]*A[3]*A[4]*A[5]*A[6]*A[7]*A[8]*A[9]*A[10])
;
writeln(B);
end;

Добавлено через 00:20 мин.
id38014870, ммм а ты не видел постом выше

[Kombat]

Английский Кидай монетки

[storm00]

LampaZ, петросян, написано не иностранный язык как бы

[Kombat]

А как используется хз)))

Добавлено через 09:32 мин.
Imprise, ну не написано же НЕ ИНОСТРАННЫЙ. :D:

[storm00]

LampaZ, где? читай внимательно
там написано язык програмирования
там тем более не только англ, а еще русский и арабский

[Andrey Borisov]

*** через кузю нового зделал

[Alexey Nifyodov]

Imprise, паскаль

[Damir]

(1443556460)

[ЛиМонЪ]

прикольно

[Vadim Ponkratov]

Круто!Спасибо!Прикольнуться над другом в самый раз!)Ну или врагу напакастить!

[Pacantre]

Imprise, c++

[газпром]

это весело

[Pacantre]

ахахахах.работает

Добавлено через 00:15 мин.
а что хоть качать будет?:D:

[Aydar Rakhmatullin]

а вирус опасный

[kote pod narkote]

ха кара

[Islam Baratov]

а смысал от него

[Serega Spiridonov]

прикольненько

[tatarin97]

норм

[kovalruslan97]

засрали интернет подобными темами

[D. Ernest]

ахахах
паходу вообще никто не шарит смысл кода....